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VORWORT 


In diesem Buch soll der Leser mit der Programmierung von 
Spielen vertraut gemacht werden. Da es sich hierbei um ein 
sehr komplexes Thema handelt, ist es im Rahmen dieses Buches 
nicht möglich, bei Grundlagen zu beginnen. Daher sollte der 
Leser folgende Voraussetzungen erfüllen: 

1. Vertraut sein mit CLI und Workbench. 

2. Kenntnisse über mathematische Grundlagen (Bit/Byte- 
Operationen , Boolsehe Algebra) haben. 

3. 68000 Assembler zumindest in den Grundzügen beherrschen 
(wobei dies nicht unbedingt für Hardware-Erfahrung 
gilt!). 

4. über die Bedienung eines Assemblers informiert sein 
(Seka Assembler wäre vorteilhaft). 

Auf diese Punkte wird im Laufe des Buches nicht näher einge¬ 
gangen. Literatur zu diesen Themen gibt es inzwischen genug 
(siehe Literaturverzeichnis). 

In diesem Buch wird die Programmierung von Spielen aus¬ 
schließlich in Assembler besprochen, da sich diese Sprache 
am besten dafür eignet. Andere Sprachen sind sicherlich ein¬ 
facher, aber nur in Assembler hat man die optimale "Bewe¬ 
gungsfreiheit", um kurze und schnelle Programme zu schrei¬ 
ben, was besonders für Spiele sehr wichtig ist. 

Die Programmierung eines Spieles bringt einige Probleme und 
viel Arbeit mit sich. Das fängt schon bei der Planung an. 
Viele Programmierer denken über dieses Problem nicht sorg¬ 
fältig nach. Meistens hat man eine gute Idee für einen Spe¬ 
zial-Effekt oder eine extrem schnelle Routine und anschlie¬ 
ßend programmiert man daraus ein Spiel. 
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VORWORT 


In den meisten Fällen führt diese Methode nicht zu einem be¬ 
friedigenden Ergebnis. Gute Spiele bedürfen sorgfältiger 
Planung. Diesem entscheidenden Schritt ist ein eigenes Kapi¬ 
tel gewidmet. 

Ein weiterer wichtiger Punkt ist die möglichst optimale Pro¬ 
grammierung und Verkürzung der Programme. Das Schöne an As¬ 
sembler ist die Vielfalt des Befehlssatzes. Der PRINT-Befehl 
in Basic ist immer gleich, das heißt er kann vom Benützer 
nicht beeinflußt werden. In Assembler hingegen kann man das 
Gleiche "kurz” oder "lang" programmieren. Dieses Thema wird 
ebenfalls ausführlich besprochen. 

Natürlich folgt den theoretischen Grundlagen der größte 
Teil des Buches: Die Programmierung. Von der Bilddarstellung 
bis zur Joystickabfrage wird alles besprochen, was zur Spie¬ 
leprogrammierung notwendig ist. 

Ebenso finden Sie im Anhang die für Hardware-Programmierer 
wichtigen Register auf einen Blick. 

Aus den oben genannten Zutaten werden wir gemeinsam Schritt 
für Schritt ein Spiel programmieren. Um Ihnen das Abtippen 
zu ersparen, ist dem Buch eine Diskette beigelegt, auf der 
Sie nicht nur alle Listings, sondern auch Grafiken und Musik 
finden. 

Ich hoffe, daß Sie mit diesem Buch viel Freude haben, und 
schon bald Ihre ersten Spiele entwickeln. 


Niki Laber 


Wien, im August 1991 
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KAPITEL 


1 


DIE ERSTEN SCHRITTE 


Zuerst entsteht eine Idee. Diese aber optimal in ein Pro¬ 
gramm umzusetzen ist nicht immer leicht. Daher befaßt sich 
dieses Kapitel mit der Ausarbeitung einer Idee und der Er¬ 
stellung eines Konzeptes, nach welchem programmiert werden 
kann. 


11 


KAPITEL 1 


Die ersten Schritte 


1.1. BETRIEBSSYSTEM JA ODER NEIN? 


Ganz zu Anfang dieses Buches möchte ich eine Grundsatzfrage 
klären, die sehr oft unter Amiga-Besitzern diskutiert wird. 
Es handelt sich hierbei um das heißumkämpfte Betriebssystem 
des Amiga. 

Die Workbench und damit das gesamte Betriebssystem haben 
mitgeholfen, daß der Amiga so weit verbreitet ist. Seine 
großartige anwenderfreundliche Benutzeroberfläche hat vielen 
Anfängern den Einstieg in die Computerwelt erleichtert. Da 
die Workbench integrierender Bestandteil des Betriebssystems 
ist, kann man jederzeit, vorallem mit Anwender-Software, 
praktisch und schnell arbeiten, ohne vorher umständliche 
Maustreiber-Programme oder ähnliches (siehe PC) zu laden. 

Allerdings man muß auch berücksichtigen, daß der Amiga ur¬ 
sprünglich als Spielkonsole konzipiert war und daher mit 
speziell dafür gedachten Chips (z.B. Blitter,...) ausgestat¬ 
tet wurde. Als Commodore den Amiga aufkaufte, wurden diese 
Pläne verworfen und eine Mischung aus Heimcomputer und 
Spielkonsole entwickelt. Die vorhandenen Grafikchips setzte 
man für das Betriebssystem ein. Die Entwickler dieses Traum¬ 
computers hatten eine genaue Vorstellung über dessen Funkti¬ 
onsweise. Das Ergebnis sollte ein Computer sein, der beiden 
Anforderungen gerecht wird. 

Diese beiden Bereiche lassen sich jedoch nur schwer in einem 
Gerät realisieren. Denn will man eine Spielkonsole, so ist 
jegliches Betriebssystem störend. Bei einem Arbeitsprogramm 
ist hingegen Grafik eher überflüssig. Daher mußte es früher 
oder später zu einem Konflikt unter den Programmierern kom¬ 
men. 

Die Einen befürworten eine systemgerechte Programmierung, 
damit jedes Programm mit der Workbench lauffähig ist. Die 
Anderen hingegen bestehen auf unabhängig programmierbare 
Routinen, die ohne Betriebssystem auskommen. 

Welche Methode ist die bessere? Diese Frage läßt sich nicht 
so einfach beantworten; Sehen wir uns die Vor- und Nachteile 
objektiv an: 
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KAPITEL 1 


Die ersten Schritte 


Wird ein Programm systemgerecht programmiert, kann man jeg¬ 
liche Vorteile, wie zum Beispiel das Multitasking ausnützen 
und somit mehrere Programme gleichzeitig verwenden. Darüber- 
hinaus kann jedes Programm auf der Festplatte installiert 
werden, wodurch sich bei längeren und aufwendigeren Program¬ 
men die Ladezeiten erheblich verkürzen. Hält sich der Pro¬ 
grammierer an die Richtlinien von Commodore, so ist sein 
Programm auch auf allen neuen Betriebssystem-Versionen lauf¬ 
fähig. 

Der Vorteil der direkten Hardware-Programmierung ist die Ge¬ 
schwindigkeit, die man dabei gewinnen kann, da man jede be¬ 
nötigte Routine hardwareorientiert schreiben muß. Außerdem 
muß man den Speicher selbst einteilen und bestimmen, wo 
eventuelle Programmteile geladen werden. 

Dafür wird man in keinster Weise durch das Betriebssystem 
eingeschränkt. Der größte Nachteil ist wohl die Geschwindig¬ 
keit mit der das Betriebssystem arbeitet. Da das ursprüngli¬ 
che System nicht in Assembler programmiert wurde, mußte 
man bis zur Version 2.0 auch dadurch Geschwindigkeitseinbu¬ 
ßen hinnehmen. Das Betriebssystem verbraucht wegen seines 
großen Umfangs sehr viel Speicherplatz. 

Es wird oft behauptet, daß bei den meisten Spielen der Ge¬ 
schwindigkeitsunterschied so gering ist, daß das Betriebssy¬ 
stem ebenfalls noch Platz hätte. Das ist oft richtig, aber 
wenn man genau nachdenkt, muß man sich wirklich fragen, wel¬ 
chen Vorteil es bringt, das System gleichzeitig zu aktivie¬ 
ren. Theoretisch könnte man spielen, während im Hinter¬ 
grund ein Listing ausgedruckt wird. Doch wer macht das wirk¬ 
lich? Selbst wenn dies einmal Vorkommen sollte, müßte das 
Spiel deswegen Einbußen hinnehmen. Daher verzichtet man in 
den meisten Fällen bei Spielen auf das Betriebssystem. 

Denn wer spielen möchte, will ein möglichst schnelles, gut 
programmiertes Spiel. Wenn man hingegen arbeiten möchte, 
wird man kaum, z.B. neben der Textverarbeitung auf ein Spiel 
umschalten. 

Die direkte Hardware-Programmierung erfordert viel Wissen, 
damit man Spiele auch für zukünftige Geräte kompatibel er¬ 
stellen kann. Denn man hat zwar die Möglichkeit sich frei im 
Computerspeicher zu bewegen, sollte aber dennoch einige Re¬ 
geln beachten, sonst passiert es, wie man jetzt sehr oft 
sieht, daß Software nicht mehr korrekt läuft (z.B. Amiga 
3000). 
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KAPITEL 1 


Die ersten Schritte 


Da wir in diesem Buch die Hardware behandeln, werden wir für 
unsere Programme das Betriebssystem trotz seiner Vorteile 
nicht verwenden, sondern alle benötigten Routinen selber 
entwickeln. Dabei soll auch darauf geachtet werden, daß die 
Kompatibilität gewahrt bleibt, das heißt, unser Spiel soll 
auch auf dem Amiga 3000 lauffähig sein. 


1.2. EINE IDEE WIRD GEBOREN 

Das wohl schwierigste Problem, das sich einem Programmierer, 
der ein Spiel schreiben will, stellt, ist die "gute Idee". 
Denn ein wirklich interessantes Spiel kann nur entstehen, 
wenn mehrere Voraussetzungen erfüllt sind. 


o eine gute Idee 
o ein Konzept 
o genaue Programmierung 
o schöne Grafik 
o gute Musik, Sound 


Von diesen Komponenten hängt das Spiel ab. Stimmt nur einer 
dieser Punkte nicht, so kann sich dies negativ auf das ge¬ 
samte Spiel auswirken. Denn was nützt die schönste Grafik, 
wenn das Spielprinzip total veraltet ist. 

Will man alle Punkte beachten und genau ausführen, so ist 
das für einen einzelnen ziemlich schwer. Außerdem würde es 
wahrscheinlich lange dauern. Daher bilden sich zunehmend 
Programmier-Teams, wobei jedem einzelnen Mitglied eine ande¬ 
re Aufgabe zugeteilt wird. Einer programmiert, ein anderer 
zeichnet die Bilder und der nächste komponiert die Musik. 
Dadurch kann sich jeder auf ein bestimmtes Gebiet speziali¬ 
sieren und es werden deutlich bessere Ergebnisse erzielt. 
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KAPITEL 1 


Die ersten Schritte 


Nebenbei wird man auch schneller fertig, da parallel gear¬ 
beitet werden kann. Gut ist es, wenn man jemanden hat, der 
die Idee zum Spiel liefert und sowohl Planung als auch Kon¬ 
zept ausarbeitet. Eine weitere Rolle gewinnt immer mehr an 
Bedeutung, nämlich die des Geschichten-Schreibers. Denn ein 
gutes Spiel braucht mehr als eine kurze Spielanleitung, in 
der man aufgefordert wird eine Prinzessin zu befreien. 

Wir wollen nun im Laufe dieses Buches alle Schritte von der 
Idee über Planung und Konzept bis hin zur Programmierung 
ausarbeiten, um letztendlich ein kleines Geschicklichkeits¬ 
spiel zu erstellen. 
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KAPITEL 2 


DIE PLANUNGS PHAS E 


Da die Planung genauso wichtig, ja fast sogar noch wichtiger 
als die Programmierung ist, haben wir ihr ein eigenes Kapi¬ 
tel gewidmet. Ebenso finden Sie hier Tips zur optimalen Pro¬ 
grammierung und zur Speicherbelegung. 


17 


KAPITEL 2 


DIE PLANUNGSPHASE 


2.1. WIE ERSTELLT MAN EIN KONZEPT 


Um ein Konzept zu erstellen, sind mehrere Schritte erforder¬ 
lich: 


Zuerst benötigt man eine, wie im vorhergehenden Kapitel 
schon besprochen. Diese sollte man in groben Zügen no¬ 
tieren, damit sie nicht vergessen wird. 

- Anschließend sollte man versuchen, diese ersten Gedan¬ 
ken in ein 1 Computerspiel gerechtes* Schema zu bringen. 
Das heißt, die Spielelemente müsen so umgewandelt bzw. 
angepaßt werden, daß sie für ein Computerspiel geeignet 
sind. 

Der nächste Schritt führt etwas weiter ins Detail. Alle 
Elemente, die das fertige Spiel enthalten soll, werden 
geordnet und zu Papier gebracht. Dazu gehört nicht nur 
das reine Spielgeschehen, sondern auch die Steuerung, 
die Bildschirmaufteilung, Ein- oder Zweispielermodus 
und ähnliches. 

Ist dies geschehen, wird das gesamte Spiel von der pro¬ 
grammtechnischen Seite beleuchtet. Das heißt, es werden 
Details wie z.B. Bildschirmauflösung, Anzahl von Objek¬ 
ten (Bobs, oder reichen Sprites?), Scrolling, u.s.w. 
bestimmt und ebenfalls auf Papier festgehalten. 

- Außerdem sollte man sich Gedanken darüber machen, wie¬ 
viel Platz man diesem Spiel eingesteht. Verwendet man 
Grafik, Sound und Musik, so wird man vielleicht nicht 
mehr mit einer einzigen Diskette auskommen. Daher soll¬ 
te man sich auch rechtzeitig nach geeigneten "Crunch*'“ 
Programmen Umsehen, die das fertige Spiel komprimieren. 

- Der letzte Schritt in der Reihe der Vorbereitungen, ist 
die Vergabe der einzelnen Aufgaben. Es heißt zwar im¬ 
mer, viele Köche verderben den Brei, aber bei größeren 
Spielprojekten ist dies nicht zutreffend. Je mehr Spe¬ 
zialisten daran arbeiten, desto besser ist das Endpro¬ 
dukt. Außerdem verkürzt sich die Zeit der Erstellung, 
da man parallel arbeiten kann. 
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KAPITEL 2 


DIE PLANUNGSPHASE 


Die aufgeführten Punkte sollten alle in schriftlicher 
Form vorliegen und an jeden Beteiligten (Programmier, 
Grafiker, Musiker, ...) ausgegeben werden, damit klare 
Richtlinien bestehen, an die sich jeder zu halten hat. 

Ein weiterer wichtiger Punkt neben dem Konzept, ist der 
gesamte Ablauf von der Idee bis hin zum Vertrieb des 
fertigen Spiels: 



BILD 1: Der Planungsablauf 
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DIE PLANUNGSPHASE 


Nachdem das Konzept ausgearbeitet ist und die Aufgaben 
an die beteiligten Personen verteilt wurden, kann die 
Programmierung beginnen. Im Konzept sollte auch jeman¬ 
den vorsehen sein, der quasi die Leitung, bzw. den Vor¬ 
sitz übernimmt und alles koordiniert. Ebenso müssen von 
diesem die fertigen Einzelteile, wie Musik, Grafik, 
Sound und das Spiel selbst zusammengefügt werden. Da¬ 
nach folgt der oftmals, vorallem bei Simulationen, 
schwierigste Abschnitt, die Testphase. Während dieser 
Zeit sollten sämtlich Fehler beseitigt werden, bevor 
das fertige Produkt ausgeliefert werden kann. 

Zunächst werden wir jetzt die obigen Schritte anhand 
unseres kleinen Spieles durchführen. Zuerst einige Wor¬ 
te zur Spielidee: Da man mit diesem Buch das Spielepro¬ 
grammieren erlernen soll, haben wir uns für ein kleines 
Geschicklichkeitsspiel entschieden. Dieses Programm ist 
nicht sehr umfangreich, damit es für Anfänger nicht zu 
verwirrend wird. Ebenso wurde versucht, möglichst viele 
Programmteile, wie z.B.: Scrolling, Coppereffekte, ... 
in das Spiel zu integrieren, das Ganze aber trotzdem 
leicht verständlich zu gestalten. 


Aufgabenstellung: 

Der Spieler muß mit seinem Spielsymbol, welches durch 
einen in Port 1 angesteckten Joystick gesteuert wird, 
auf einem Spielraster zwei verschiedenfarbige, bewegte 
Objekte hintereinander berühren. Der Spielraster soll 
aus zwei Ebenen bestehen, die vertikal in verschiedenen 
Geschwindigkeiten gescrollt (bewegt) werden. Erschwert 
wird dies dadurch, daß sich der Spieler nur über eine 
dieser Ebenen bewegen darf, da ihm sonst Lebensenergie 
abgezogen wird. Zwei weitere animierte Objekte bewegen 
sich auf diesen Ebenen. 

Es ist nun die Aufgabe des Spielers, mit seinem Symbol 
zuerst das eine und anschließend das zweite Objekt zu 
berühren. Ist dies geschehen, soll an der im unteren 
Teil des Bildschirms befindlichen Tafel, eines von zehn 
Symbolen abgehakt werden. Sind zehn dieser Symbole 
durchgestrichen, so ist das Spiel zu Ende. 
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DIE PLANUNGSPHASE 


Damit das Spiel nicht zu einfach wird, ist noch ein 
Gegner eingebaut, der vom Spieler nicht berührt werden 
darf. Wenn doch, so verliert man eines seiner drei 
Bildschirmleben. 

Sehen wir uns diese Beschreibung in grafischer Form an: 



i 


Die Rnzeige-Tafel 

BILD 2: Das Spielfeld 
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DIE PLANUNGSPHASE 


Das Spielfeld selbst besteht aus zwei, voneinander un¬ 
abhängigen Playfields (Erklärungen dazu folgen im Kapi¬ 
tel Playfields), welche unterschiedlich groß sind und 
vertikal in verschiedenen Geschwindigkeiten gescrollt 
(bewegt) werden. 

Im Hintergrund soll als weitere Ebene eine, mittels 
Copper erzeugte, 3D-Rolle auf und ab bewegt werden. 

- Das Spielfeld selbst ist nur 320x200 Bildpunkte groß. 
Der untere Teil (PAL) soll für eine Anzeigetafel ge¬ 
nützt werden. Dazu müssen wir den Bildschirm aufteilen. 
Diese Tafel beinhaltet nicht nur die Anzahl der Bild¬ 
schirmleben, sondern auch die bereits erfolgten Berüh¬ 
rungen des Spielers, sowie dessen Lebensenergie. 

Das Symbol des Spielers wird durch einen, in Port 1 an¬ 
gesteckten, Joystick gesteuert. 

Die restlichen drei Symbole werden zufällig über den 
Bildschirm bewegt. 

- Außerdem soll zusätzlich die linke Maustaste abgefragt 
und auf Druck derselben, das Spiel wieder beendet wer¬ 
den. 

Die Objekte werden selbstverständlich animiert. 

Ebenso soll ein Sample als Hintergrund-Musik abgespielt 
werden. 


Nun haben wir das Konzept sowohl grafisch dargestellt, als 
auch in Worte gefaßt, damit wir es bei der Programmierung 
leichter haben. In jedem Kapitel werden wir auf die einzel¬ 
nen Punkte näher eingehen. 
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2.2. DIE SPEICHERBELEGUNG 


Sehr wichtig für die Spiele-Programmierung ist die Kenntnis 
des Speicherbelegung, denn wenn man Hardware programmiert, 
sollte man genau wissen, wo man Daten ablegen kann, wo Spei¬ 
chererweiterungen und das Kickstart-ROM liegen. Sehen wir 
uns daher folgende Belegung an: 


$000000 

$040000 

$080000 

$200000 

$a00000 

$C00000 

(ipQnnnn 

(256 KB RAM A1000) 

. . .. qio trp r»V, •» -n D AM 

1 

- — — — — — DIZ x\D UilXp K/U v l — — — 

(256 KB Speichererweiterung A1000) 

1 

reserviert 

1 

8 MB Fast RAM 

1 

teilweise belegt von CIA Registern 

1 

512 KB Speichererweiterungen 

1 

pLOUUUU 

nnnn 

nicht in Verwendung 

1 

yUUUUUU 

teilweise belegt von Customchips, 
Erweiterungen, u. ä . 

yCU U U U U 

reserviert 

1 

yvOvvUv 

tfnnnnn 

Expansionsport 

1 

iJIUUUUU 

tfonnnn 

reserviert 

1 

piouuuu 

Spiegelung des Kickstart ROMs 

1 

y L v v U v v 

Sffffff 

256 KB Kickstart ROM 

_l 
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Wie wir aus der vorigen Darstellung entnehmen können, ist 
der 68000er in der Lage, einen Speicherbereich von $000000 
bis zu adressieren. Dies entspricht einer Adreßbrei- 
te von 16 MegaByte. 2 hoch 24 (24 Bit breiter Adreßbus) er¬ 
gibt 16,777216 MegaByte. 

Der unterste Speicherbereich (von $000000 bis $080000) wird 
Chip-RAM genannt, da auf diesen Speicherbereich die Custom- 
chips Einfluß nehmen können. Der Zugriff dieser Chips auf 
höher liegende Speicherplätzen ist nicht möglich, denn der 
ist nur dem 68000er Vorbehalten. Daher wird dieser Speicher¬ 
bereich auch Fast-Mem genannt. Es gibt inzwischen die Mög¬ 
lichkeit 1 MB Chip-RAM zu verwenden. 

Die Speicherbereiche $a00000 und $d00000 werden teilweise 
von den Customchips und CIA-Registern verwendet. Diese Regi¬ 
ster werden wir später noch genauer kennenlernen. 

Im obersten Teil des Speichers befindet sich das Betriebssy¬ 
stem (ROM) und dessen Spiegelung. 
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2.3. OPTIMIERTE PROGRAMMIERUNG 


Assembler wird zurecht als komplizierteste Computersprache 
bezeichnet. Denn der wohl größte Nachteil dieser Sprache ist 
die große Anzahl von Befehlen und die Vielfalt wie diese Be¬ 
fehle verwendet werden können. Dafür hat der Programmierer 
uneingeschränkte Freiheit beim Arbeiten. Er kann nicht nur 
über Speichereinteilung und Verwaltung selbst verfügen oder 
die letzten Tricks und Effekte aus den Chips kitzeln, son¬ 
dern auch Einfluß auf die Geschwindigkeit seiner Programme 
nehmen. In anderen Sprachen, vorallem in den sogenannten hö¬ 
heren Programmiersprachen wie zum Beispiel in Basic, ist es 
nicht möglich einen Befehl schneller zu machen. Ein Bei¬ 
spiel: "PRINT" bleibt "PRINT" und wird nicht schneller. In 
Assembler hingegen kann man diesen Befehl "langsam" oder 
"schnell" programmieren. Wir haben an dieser Stelle einige 
Tricks aufgeführt, die mithelfen, Ihre Programme kürzer und 
schneller zu machen. 


Register löschen 

Das Einsparen sowohl von Taktzyklen als auch von Bytes be¬ 
ginnt schon mit dem Löschen von Registern. Die wohl umständ¬ 
lichste Art ein Register zu löschen ist: 

move.1 #$00000000,d5 

Um ein Datenregister zu löschen, wird wohl kaum jemand die¬ 
sen Befehl verwenden. Viel häufiger wird 

clr.l d5 

verwendet. Viel schneller, was viele jedoch nicht wissen ist 
das Kommando 

moveq.l #0,d5 

Dieser Befehl benötigt nur 2 Bytes und 4 Taktzyklen wogegen 
clr.l um 2 Taktzyklen mehr benötigt. Der clr Befehl hat den 
Vorteil, daß er auch Word- und Byteweise ausführbar ist. 
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Mit Adreß-Registern verhält es sich ähnlich. Aber die clr 
oder moveq Befehle gelten nicht für Adreß-Register. Dennoch 
sollte man 

move.l #0,a0 

vermeiden und statt dessen 
suba.l aO,aO 

verwenden. Denn wenn man von aO dessen Inhalt subtrahiert, 
erhält man ebenfalls 0. Zudem ist die zweite Version um vier 
Byte kürzer und um 4 Zyklen schneller. 


Quick-Befehle 

Weitere Einsparungen lassen sich durch die Verwendung der 
schon erwähnten Quick-Befehle erzielen. Der Amiga bietet uns 
drei dieser Befehle an. Den ersten, moveq, haben wir bereits 
kennengelernt. Die anderen beiden sind subq und addq. 

add.l #1,Speicherstelle 

addq.1 #1,Speicherstelle 

Addq ist hier sogar um die Hälfte kürzer und spart 8 Takt¬ 
zyklen. Der Nachteil ist, daß addq und subq nur eine drei 
Bit-Zahl (dies entspricht einer Zahl von 0-7) verarbeiten 
kann. Will man Zahlen größer als 7 addieren, so kann man den 
lea-Befehl verwenden. Dieser ist aber nur in Verbindung mit 
Adreß-Registern möglich. Statt 

add.l #10,aO 

verwendet man 

lea 10(a0),a0 

und spart dadurch zwar keine Bytes aber immerhin 6 Takt¬ 
zyklen . 
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PC-relative Adressierung 

Platz läßt sich auch sparen, wenn man die sogenannte PC¬ 
relative Adressierung verwendet. Was bedeutet nun PC¬ 
relativ? Wie Sie sicherlich wissen, ist der Amiga ein multi¬ 
tasking-fähiges Gerät. Das bedeutet, daß mehrere Programme 
scheinbar gleichzeitig verarbeitet werden können. Dadurch 
wird es nötig, daß jedes Programm an jeder beliebigen Adres¬ 
se im Speicher funktionieren muß. Daher wird nun für jedes 
Programm ein Code erzeugt, der bei Adresse 0 beginnt. Im Fi¬ 
le ist eine Tabelle enthalten, die vor dem Start das Pro¬ 
gramm an die jeweilige Adresse anpaßt. Jede im Programmcode 
enthaltene 32-Bit Adresse enthält ein zusätzliches Longwort 
im sogenannten Relocation-Hunk. Programmiert man jedoch PC¬ 
relativ, entfällt nicht nur der Eintrag in diese Tabelle, 
sondern das Programm wird kürzer und sogar schneller. Sehen 
wir uns hierzu ein Beispiel an, statt 

lea copperliste,al 

verwendet man die PC-relative Version: 

lea copperliste(pc),al 

Der einzige Nachteil ist, daß dies nur bei einem Distanzwert 
einer vorzeichenbehafteten 16-Bit Zahl funktioniert. Das be¬ 
deutet in unserem Fall, daß der Label 'copperliste' nicht 
weiter als +32768 oder -32767 Bytes entfernt sein darf. Da¬ 
her sollte man, wenn man PC-relativ programmiert, solche La¬ 
bels in der Mitte seines Programms plazieren, damit sie so¬ 
wohl von vorne, als auch von hinten erreichbar sind. 

Leider ist der lea-Befehl nur bei Adreß-Registern zuläßig. 
Will man jedoch platzsparend Adressen in ein Datenregister 
einiesen, so empfiehlt es sich zu folgendem Trick zu grei¬ 
fen. Statt 

move.1 #copperliste,dO 


nimmt man 


lea copperliste(pc),a0 
move.l aO,dO 

Es sind zwar zwei Befehle statt einem, aber trotzdem spart 
man immerhin vier Bytes. Von der Geschwindigkeit her sind 
beide Versionen gleich. 
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Die PC-relative Programmierung kann man ebenso bei Sprungbe¬ 
fehlen einsetzen. Um eine Unterroutine anzuspringen gibt es 
den Befehl 

jsr unterroutine 

Mit PC-relativem Code wird diese Routine natürlich kürzer: 
jsr unterroutine(pc) 

Die gleiche Adreßdistanz bietet uns aber auch der Befehl 
bsr unterroutine 

Daher ist dieser der obigen Version vorzuziehen. 


Die Short-Befehle 


Um die oben erklärten Sprungbefehle noch weiter zu verkür¬ 
zen, sind an dieser Stelle die Short-Kommandos erwähnt. Beim 
68000er haben wir die Möglichkeit, bei Verzweigungs- 
Befehlen, die im Byte-Bereich liegen (von -127 bis +128), 
den Befehl durch den Anhang 


xxx. s 

zu verkürzen. Daher lautet unser Sprungbefehl 
bsr.s unterroutine 

und ist somit um weitere 2 Byte kürzer. Selbstverständlich 
gibt es die Short Version bei allen anderen Sprung-Befehlen 
auch, wie zum Beispiel 

beq.s labeil 

bne.s label2 

blt.s label3 
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Weitere Adressierungsarten 

Da Hardware-Programmierer die Register fast immer direkt an¬ 
sprechen, kann man mit einem einfachen Trick auch einiges an 
Zeit einsparen. Will man zum Beispiel einige Farbwerte in 
die zugehörigen Farbregister eintragen so wird das oft so 
erledigt: 

move #$f00,$dff180 
move #$0f0,$dff182 


Besser und kürzer ist es, wenn man die Basisadresse vorher 
in ein Register einträgt und die Farben über dieses in das 
Hardware-Register schreibt. 

lea $dff180,a0 
move #$f00,(a0) 
move #$0f0,2(a0) 


Noch schneller wird das Programm, wenn man folgende Kombina¬ 
tion verwendet: 

lea $dff180,a0 
move #$f00,(a0)+ 
move #$0f0,(a0)+ 


Will man jedoch nur einen Farbwert eintragen, so ist natür¬ 
lich die allererste Version die beste und schnellste, aber 
bereits ab zwei Befehlen ist die letzte von Vorteil. Es emp¬ 
fiehlt sich überhaupt, beim Hardware-Programmieren, die Ba¬ 
sisadresse ($dff000), der Hardware-Register in ein Adreß- 
Register einzulesen. 

lea $dff000,a6 

Am besten verwendet man ein Adreß-Register, das man sonst 
eher nicht benötigt. Dadurch kann man immer auf die Basis¬ 
adresse zugreifen. Allerdings muß man beachten, daß es ziem¬ 
lich sicher zu einem Absturz kommen wird, wenn dieses Regi¬ 
ster überschrieben wird und man anschließend wieder auf 
Hardware-Register zugreifen will. 
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Darüberhinaus läßt sich noch Zeit und Speicherplatz sparen, 
wenn man keine unnötig "lange" Adressierung verwendet. Denn 
es gibt die sogenannte "absolut kurze" Adressierung. Will 
man zum Beispiel eine eigene Interrupt-Routine schreiben, so 
muß zuerst der originale Einsprung gerettet werden, dies 
wird von den meisten Programmierern so gelöst: 

move.l $6c,saveirq 

Viele wissen aber nicht, wie man die absolut kurze Adressie¬ 
rung richtig einsetzt. Mittels 

move.l $6c.w,saveirq 

werden nicht nur 2 Byte, sondern auch noch 4 Taktzyklen ein¬ 
gespart. 


Multiplizieren und Dividieren 

Der 68000er bietet für Multiplikationen und Divisionen die 
Befehle mulu, muls, divu und divs an. Für den Programmierer 
recht angenehm, da er zwischen vorzeichenrichtiger Multipli¬ 
kation oder Division wählen kann. Leider sind diese Opera¬ 
tionen aber extrem zeitintensiv, mulu/muls benötigen unge¬ 
fähr 80 Taktzyklen. Divu/divs hingegen noch fast das Doppel¬ 
te. Daher sollte man diese Befehle, wann immer es möglich 
ist, vermeiden. Bei einfachen Multiplikationen mit 2 ist der 
einfache add-Befehl vorzuziehen: 

mulu #2,d6 

ist viel langsamer als 
add.l d6,d6 

Denn bei Additionen mit 2 ist es viel kürzer und extrem 
schneller, wenn man den Inhalt des jeweiligen Registers zu 
sich selber hinzuaddiert. 
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Hat man es mit größeren Multiplikationen zu tun, kann man 
mit den lsl- und asl-Befehlen Abhilfe schaffen. 

mulu #16,d6 

wird durch den Gebrauch von 
lsl.l #4,d6 

nich nur um 4 Bytes kürzer, sondern auch um ungefähr 60 
Taktzyklen schneller. Analog dazu ist bei divs/divu lsr und 
asr zu verwenden. 


Longwords, Words oder Bytes 

Eine weitere Methode um vorallem Speicherplatz zu sparen, 
ist die genaue und gezielte Verwendung von Longwords, Words 
und Bytes. Nur allzu oft werden unnötigerweise Longwords de¬ 
finiert, obwohl ein Byte völlig ausgereicht hätte. Ein Bei¬ 
spiel : 


move.l #15,dO 
move.l #145,dl 
add.l d0,dl 
move.l dl,Speicher 

Speicher: dc.l 0 

übersteigt der Wert der Addition 255 nicht, so genügt fol¬ 
gendes Listing: 

move.b #15,d0 
move.b #145,dl 
add.b #d0,dl 
move.b dl,Speicher 

Speicher: dc.b 0 

Dieser Vorgang spart nur fast unwesentlich an Zeit, aber im¬ 
mens an Speicherplatz. Außerdem kann man Platz sparen, wenn 
man bei Eintreffen eines bestimmten Ereignisses, nicht ein 
ganzes Byte "blockiert”, sondern sich mit einem Bit begnügt. 
Ein Byte besteht bekanntlich aus 8 Bit. Daher könnte man 
beispielsweise 8 verschiedene Ereignisse darin festhalten. 
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cmp.b #l,test 
cmp.b #l,testl 
cmp.b #l,test2 


Anstatt einen bestimmten Wert abzufragen, könnte man sich 
mit einem Bit des Bytes "test" begnügen, somit sparen wir 
uns die Definition der anderen Bytes (testl, test2,...). Der 
Amiga stellt uns sogar einige Befehle für die Arbeit mit 
Bits zur Verfügung: 

btst, bchg, bset und bclr 

Wir sparen also Speicher, wenn wir diese Befehle einbauen, 
btst #l,test 
btst #2,test 
btst #3,test 


Wie man ein Register oder eine Speicherstelle möglichst 
schnell löscht, haben wir bereits gelernt. Aber wie ist es, 
wenn wir einen anderen Wert als 0 in einer Speicherstelle 
für eine spezielle Abfrage benötigen? 

move.b #$ff,speicherstelle 

Bei dem Wert $ff ist dies kein Problem, da hierfür ein be¬ 
stimmter Befehl existiert, der viel schneller ist: 

st speicherstelle 

Dieser Befehl schreibt den Wert $ff in die angegebene Spei¬ 
cherstelle. 
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Kürzere Schleifen 

Will man eine Schleife programmieren, so sollte man dazu 
möglichst nicht die Kommandos sub/cmp/bne verwenden, sondern 
mit den vom 68000er zur Verfügung gestellten dbcc-Schleifen 
arbeiten. 

Ein Beispiel zu Verdeutlichung: Es sollen 100 Longwords von 
aO nach al kopiert werden. 

schleife: move.l {a0)+,(al)+ 

add.l #l,d0 
cmp.l #100,do 
bne schleife 

Die oben gezeigte Schleife ist besonders schlecht program¬ 
miert, nicht nur, weil die dbcc-Schleife keine Anwendung ge¬ 
funden hat, sondern weil unnötigerweise auch mit Longwords 
und ohne Short-Anweisung gearbeitet wurde. Zum Vergleich ei¬ 
ne etwas bessere Version: 

schleife: move.l (a0)+,(al)+ 

add.b #1,d0 
cmp.b #100,dO 
bne.s schleife 

Aber nun folgt die beste Möglichkeit: 
move #99,dO 

schleife: move.l (a0)+,(al)+ 

dbra do,schleife 

Mit diesem Programm wurden nicht nur Byte sowohl im Code als 
auch im Quelltext gespart, sondern auch ganz erheblich die 
Geschwindigkeit gesteigert. Die dbcc-Befehle sind mit dbeq 
oder dbne möglich. Man sollte diese Kommandos den cmp-Befeh- 
len vorziehen und versuchen, seine Programme anzupassen, 
sprich anstatt einen Zähler zu erhöhen, einfach mittels dbcc 
auf -1 zählen lassen. Ist trotzdem einmal ein Vergleich mit 
0 nötig, 


cmp.b #0,speicherstelle 


spart man auch, wenn man den tst-Befehl verwendet: 
tst.b speicherstelle 
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Dieser Befehl existiert sowohl im Byte-, Word- als auch im 
Longword-Format. 

Manchmal können Schleifen trotz dbcc-Anweisung viel zu lange 
dauern. Daher ist man schneller, wenn man die Befehle direkt 
hintereinander in den Speicher schreibt. Diese Methode hat 
den Nachteil, daß sie ziemlich speicheraufwendig ist. Es 
liegt nun am Programmierer, zu entscheiden, was ihm wichti¬ 
ger ist, Speicher oder Geschwindigkeit. 

move #9,d0 

schleife: clr.l (a0)+ 

dbra dO,schleife 


clr.l (a0)+ 
clr.l (a0)+ 
clr.l (a0)+ 
clr.l (a0)+ 
clr.l (a0) + 
clr.l (a0)+ 
clr.l (a0)+ 
clr.l (a0)+ 
clr.l (a0) + 
clr.l (a0)+ 

Sie sehen sofort, wie Speicherintensiv die zweite Version 
ist, dafür ist sie unheimlich schnell, was manchmal aus¬ 
schlaggebend sein kann. 

Dies sind nur einige Tips und Tricks, die mithelfen ein Pro¬ 
gramm kurz und zeitsparend zu schreiben. Sie werden merken, 
daß dies gar nicht so einfach ist. Man muß schon ein erfahr¬ 
ener Programmierer sein, um möglichst viele dieser Tips zu 
beherzigen. Selbst wenn man diese Methoden kennt, ist man 
oft schlampig oder findet es nicht der Mühe Wert seine Pro¬ 
gramme zu verkürzen. Man sollte aber schon von Beginn an 
versuchen korrekt zu arbeiten, auch wenn man glaubt, keine 
Probleme mit den Taktzyklen zu bekommen; denn gerade bei 
Spielen hat man diese Sorgen öfter als man denkt. Besonders 
bei längeren Programmen ist sehr schwer eine bereits fertige 
Routine nachträglich zu optimieren. 


34 



KAPITEL 3 


DIE PROGRAMMIERUNQ 


In diesem Kapitel wird auf die Programmierung des Amiga, 
insbesondere der Custom-Chips eingegangen. Beginnend beim 
Copper, der für die Bilddarstellung verantwortlich ist, über 
Playfields und Sprites bis hin zum Blitter wird alles genau 
beschrieben und in ein Spiel eingebaut. 
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3.1. DER COPPER 


In den vorhergehenden Kapitel, wurden die Entstehung eines 
Computerspieles und dessen theoretische Programmierung be¬ 
sprochen, sowie einige Beispiele für die Optimierung der 
Programme gegeben. In den nun nachfolgenden Kapitel wollen 
wir die praktische Seite näher betrachten. 


Neben dem 68000er gibt es noch weitere Zusatz-Chips, die dem 
Prozessor Arbeit abnehmen sollen, damit dieser entlastet 
wird. Der erste, den wir hier besprechen wollen, der auch 
eine wichtige Rolle bei der Bilddarstellung spielt, ist der 
Copper (Coprozessor). Dieser Prozessor hat die Aufgabe, Wer¬ 
te in Registern an beliebiger Bildschirmposition zu verän¬ 
dern. Um dies genauer zu erklären, ist es nötig etwas weiter 
auszuholen: 

Um ein Bild auf einem Fernseher oder Monitor darzustellen, 
verwendet man elektrisch geheizte Kathodenstrahlröhren. An 
deren Ende treten negative Elektronen aus, die gebündelt und 
abgelenkt werden. Der dadurch entstehende Strahl trifft auf 
einer flureszierenden Schicht auf und bringt diese zum 
Leuchten. Durch magnetische Felder wird dieser Strahl von 
links nach rechts und Zeile für Zeile von oben nach unten 
gelenkt. Dadurch entsteht ein sichtbares Schwarz/Weiß-Bild. 
Will man hingegen ein farbiges Bild erhalten, so kommt die 
additive Farbmischung zur Anwendung. Man verwendet statt ei¬ 
ner Kathodenstrahlröhre gleich drei und läßt sie auf ein, 
jeweils mit roter, grüner oder blauer Farbe beschichtetem, 
Material treffen. Ist diese beschichtete Oberfläche genügend 
fein gerastert, werden die einzelnen Pixel vom Auge als ein 
Punkt erfaßt, und man sieht die gewünschte Mischfarbe. Durch 
diese Farbmischung können alle Farben gebildet werden. Bei 
maximal eingestellten Strahlenströmen entsteht die Farbe 
weiß, bei minimalen Strömen (= null) hingegen entsteht 
schwarz. Damit das Auge den Bildschirmaufbau nicht mehr 
wahrnimmt, muß dies ziemlich schnell geschehen. Bei einer 
Netzfrequenz von 50 Hertz wird das Bild durch den Elektro¬ 
nenstrahl eben 50 Mal aufgebaut. 
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Nun, was hat dies mit dem Copper zu tun? Der Copper ist, wie 
oben schon erwähnt, in der Lage, an jeder beliebigen Positi¬ 
on, Register zu verändern. Das bedeutet, er kann z.B. die 
Auflösung mitten im Bild umschalten. Dadurch kann beispiels¬ 
weise der obere Teil in Lo-res und der untere Teil in Hi-res 
angezeigt werden. Dies kommt auch auf der Workbench zur An¬ 
wendung, wenn man mehrere Screens übereinander legt. Natür¬ 
lich war dies noch lange nicht alles, sondern es ergeben 
sich unzählige Möglichkeiten und Tricks, mit denen man vor¬ 
allem für Spiele schöne Effekte zaubern kann. 


3.1.1. DIE COPPER-BEFEHLE 

Der Copper besitzt genauso wie der 68000er einen Befehls¬ 
satz, also eine Reihe von Befehlen, mit denen der Prozessor 
gesteuert wird. Der Befehlssatz des 68000er ist im Gegensatz 
zum Copper riesig, da dieser nur drei Befehle kennt. Diese 
drei sind der Move-, Wait- und Skipbefehl. 


Der MOVE-Befehl 

Dieser Befehl ermöglicht es dem Copper, Customchip-Register 
zu beschreiben. Wie alle Copper-Kommandos besteht auch der 
Move-Befehl aus zwei Befehlsworten. Im ersten Wort steht die 
Customchip Adresse, die verändert werden soll und im zweiten 
steht der Wert, mit dem dieses Register beschrieben werden 
soll. Als Kennzeichen für den Move-Befehl dient das gelösch¬ 
te Bit 0 des ersten Befehlswortes. Da alle Customchip- 
Register sowieso an geraden Adressen liegen, ist dieses Bit 
automatisch immer gelöscht. 

Normalerweise kann man mit dem Copper die Register von $0000 
bis $007f nicht beeinflußen. Wird aber das unterste Bit im 
sogenannten COPCON-Register ($dff02e) gesetzt, so wird es 
für den Copper möglich die Register $0040 bis $007f zu ver¬ 
wenden und somit auch den Blitter zu beeinflußen. Der Zu¬ 
griff auf die untersten Register von $0000 bis $0040 ist al¬ 
lerdings nicht möglich. 

Ein Beispiel: 


dc.w $0180,$0fff 

Dieser Befehl schreibt in das COLOROO-Register den Wert 
$0fff ($0fff entspricht der Farbe weiß). 
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Der WAIT-Befehl 

Dieser Befehl veranlaßt den Copper so lange zu warten, bis 
der Elektronenstrahl eine gewisse Position erreicht hat. 
Diese kann sowohl vertikal, als auch horizontal sein. Als 
Kennung ist Bit 0 immer auf 1 zu setzten. Die Bits 1-7 geben 
die horizontale, die Bits 8-15 die vertikale Position an. Im 
zweiten Befehlswort stehen die Maskenbits. Diese bestimmen, 
welche Bits der horizontalen und vertikalen Position über¬ 
haupt zum Vergleich mit der Rasterstrahlposition verwendet 
werden sollen. Die Maskenbits erstrecken sich über die Bits 
1-14. Bit 15 wird auch das Blitter Finish Disable Bit ge¬ 
nannt. Dies dient bei Verwendung von Blitter durch den Cop¬ 
per. Denn ist dieses Bit gelöscht, wartet der Copper bei je¬ 
dem Wait, bis der Blitter seine Aufgaben beendet hat. An¬ 
schließend wird mit den anderen Copperbefehlen fortgefahren. 
Setzt man jedoch dieses Bit, so wird der Blitterstatus igno¬ 
riert und der Copper setzt seine Arbeit ungestört fort. 

Ein Beispiel: 

dc.w $0501,$fffe 

Es wird auf die vertikale Zeile $0500 gewartet. 


Der SKIP-Befehl 

Der dritte und letzte Copper-Befehl dient dazu, die tatsäch¬ 
liche Strahlenposition mit der im ersten Befehlswort angege¬ 
benen zu vergleichen. Ist diese größer oder gleich, so über¬ 
springt der Copper den nächsten Befehl. Somit lassen sich 
einfache Verzweigungen programmieren. Der Aufbau des Skip- 
Befehls ist dem des Wait-Befehls sehr ähnlich, nur daß Bit 0 
im zweiten Befehlswort immer auf 1 zu setzen ist. 
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3.1.2. DIE COPPERLISTE 

Die oben besprochenen Copperbefehle werden in einer Art 
kleinem Programm zusammengefaßt, der sogenannten Copperli- 
ste, und anschließend dem Copper übergeben. 

Der Copper läßt sich nicht nur durch die drei Copperbefehle 
steuern, sondern auch durch einige wichtige Register beein¬ 
flussen. 


COPCON ($dff02e) 

Ist Bit 0, welches auch das einzige Bit dieses Registers 
ist, gesetzt, so kann der Copper, wie schon oben erwähnt, 
auch auf die Register von $dff040 bis $dff07e zugreifen. 

COP1LCH ($dff080) 

Dieses Register enthält das Highword der Adresse der ersten 
Copperliste. 

COP1LCL ($dff082) 

Hier ist das, zu COP1LCH zugehörige Lowword der ersten Cop¬ 
perliste gespeichert. 

COP2LCH ($dff084) 

Dieses Register enthält das Highword der Adresse der zweiten 
Copperliste. 

COP2LCL ($dff086) 

Hier ist das zu COP1LCH zugehörige Lowword der zweiten Cop¬ 
perliste gespeichert. 

COPJMP1 ($dff088) 

Nach jedem abgearbeiteten Befehl erhöht der Copper einen 
Zähler um zwei Worte, damit dieser auf den neuen Befehl in 
der Copperliste zeigt. COPJMP1 und COPJMP2 dienen als Zeiger 
auf diesen Zähler. Das bedeutet, daß man die Anfangsadresse 
der Copperlist in diesen Zähler laden muß, um den Copper an 
einer bestimmten Position beginnen zu lassen. 

COPJMP2 ($dff08a) 

Genau wie COPJMP1, nur für die zweite Copperliste. 
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Diese Coppersteuer-Register sind nicht die einzigen wichti¬ 
gen Register. Denn um ein sichtbares Bild zu erzeugen sind 
noch einige, teils vom Copper unabhänige Schritte durchzu¬ 
führen. Sehen wir uns doch zuerst das fertige Programm an. 
Das folgende Listing erstellt eine Copperliste, die einen 
eigenen Screen öffnet: 


; Copper-Demo für einen einfachen Screen 


s: 

move.w #$4000,$dff09a ;Interrupts sperren 

/Betriebssystem ausschalten 
move #$0020,$dff096 /Sprites ausschalten 

move.l #copperl,$dff084 /Copperliste aktivieren 

r 

loop: move.l $dff004,d0 /Warten auf Rasterstrahl 

and.l #$fff00,d0 
cmp.1 #$00003000,d0 

bne.s loop 

btst #6,$bfe001 /Maustaste gedrückt ? 

bne.s loop /Ja ? 

ende: move #$c000,$dff09a /Interrupts erlauben 

e: rts /Programmende 


copperl: dc.w $008e,$3081 
dc.w $0090,$35cl 
dc.w $0104,$0064 
dc.w $0092,$0038 
dc.w $0094,$00d0 
dc.w $0102,$0000 
dc.w $0108,$0000 
dc.w $010a,$0000 
dc.w $0100,$1200 
dc.w $00e0,$0005 
dc.w $00e2,$0000 
dc.w $0180,$0000 
dc.w $ffff,$fffe 


/DIWSTRT 
/DIWSTOP 
/BPLCON2 
/DDFSTRT 
/DDFSTOP 
/BPLCON1 
/BPLIMOD 
/BPL2MOD 
/BPLCONO 
/BPL1PTH 
/BPL1PTL 
/ COLOROO 

/Warten auf unmögliche 
/Position 
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Zuerst müssen wir das Betriebssystem abschalten, da es bei 
unserem Spiel nur stören würde. Dies geschieht mit dem Be¬ 
fehl 

move.w #$4000,$dff09a 

der alle Interrupts sperrt, und somit das Betriebssystem 
'lahmlegt'.Dann müssen wir die Sprites ausschalten, um ein 
eventuelles lästiges Flackern zu verhindern. Dies geschieht 
mit 

move #$0020,$dff096 

Nun wird die eigene Copperliste dem Copper mitgeteilt. Wir 
beschreiben das COP2LCH und das C0P2LCL Register gleichzei¬ 
tig mit einem MOVE-Befehl. 

move.1 #copperl,$dff084 

Das war eigentlich schon alles. 

Damit das Programm auf dem Bildschirm bleibt, müssen wir ei¬ 
ne kleine Schleife anlegen, in der immer gewartet wird, bis 
der Rasterstrahl eine bestimmte Position erreicht hat. Da¬ 
nach wird die linke Maustaste abgefragt. Wurde sie gedrückt, 
so wird das Programm beendet, wenn nicht wird wieder in die 
Schleife verzweigt. 

loop: move.l $dff004,d0 ;Warten auf Rasterstrahl 

and.l #$fff00,d0 
cmp.l #$00003000,d0 
bne.s loop 

btst #6,$bfe001 /Maustaste gedrückt ? 

bne.s loop ;Ja ? 

Wird nun die linke Maustaste gedrückt, müssen wir das Pro¬ 
gramm "sauber" beenden. Das heißt wir müssen sämtliche In¬ 
terrupts wieder erlauben. 

ende: move #$c000,$dff09a /Interrupts erlauben 

e: rts /Programmende 

Nun kommen wir zum eigentlichen Teil unseres Programms, der 
Copperliste. Sicherlich werden Sie nicht sofort alle Befehle 
verstehen und ich möchte jetzt auch noch nicht alles erklä¬ 
ren, sondern auf das Kapitel Playfields verweisen, wo alle 
Befehle für den Bildschirm- und Playfieldaufbau erklärt wer¬ 
den. Dennoch ist es für unsere Copper-Demonstration wichtig 
diese Befehle in unsere Copperliste aufzunehmen. 
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Es läßt sich allgemein sagen, daß es sich in dieser Copper¬ 
liste um eine Auflistung von MOVE-Befehlen handelt, die dem 
Copper zur Bildschirmdarstellung übermittelt werden. Es wer¬ 
den sowohl die Fenstergröße als auch alle dazugehörigen Pa¬ 
rameter eingestellt. Einen Befehl, den Sie sicherlich gleich 
erkannt haben, ist die Zuweisung der Hintergrundfarbe: dc.w 
$0180,$0000 wobei $0000 schwarz bedeutet. Verändern Sie die¬ 
sen Wert zum Beispiel einmal auf $0f00 und betrachten Sie 
das Ergebnis. 

Um dem Copper zu sagen, daß die Copperliste beendet ist und 
er wieder von vorne beginnen soll, bedient man sich einer 
einfachen Methode: Man läßt ihn auf eine unmögliche Strah¬ 
lenposition warten. Dadurch erkennt er das "Ende” und be¬ 
ginnt von neuem. 


copperl: dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
7 

dc.w 

7 

dc.w 


$008e,$3081 
$0090,$35cl 
$0104,$0064 
$0092,$0038 
$0094,$00d0 
$0102,$0000 
$0108,$0000 
$010a,$0000 
$0100,$1200 
$00e0,$0005 
$00e2,$0000 

$0180,$0000 

$ffff,$fffe 


;DIWSTRT 
;DIWSTOP 
;BPLCON2 
;DDFSTRT 
;DDFSTOP 
;BPLC0N1 
;BPL1MOD 
;BPL2MOD 
;BPLCON0 
;BPL1PTH 
;BPL1PTL 

;COLOROO 

;Warten auf 
/Position 


unmögliche 


Wollen wir zum besseren Verständnis der Copperliste und ih¬ 
rer Anwendung noch ein kleines Programm schreiben, welches 
uns ermöglicht, die Hintergrundfarbe öfter zu initialisie¬ 
ren. Dadurch können wir den, jetzt einfarbigen Bildschirm in 
einen mehrfarbigen umwandeln. 

Das nun folgende Programm soll die Hintergrundfarbe (Regi¬ 
ster $dffl80) dreimal unterteilen und mit drei neuen Farb¬ 
werten belegen. 
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Bevor wir jedoch die eigene Copperliste starten, werden wir 
noch eine kleine Veränderung im Hauptprogramm vornehmen. Es 
kann bei unserem ersten Listing vorgekommen sein, daß auf 
dem schwarzen Bildschirm zusätzlich irgendein "Mist" zu se¬ 
hen war. Dies liegt daran, daß wir die Adresse, an der unser 
Bildschirmspeicher liegt, das ist der Bereich, der von uns 
als sichtbarer Bereich definiert wurde, nicht von restlichen 
Daten befreit (gelöscht) haben. Unser Bildschirmspeicher 
zeigt auf die Adresse $50000 

(Befehl: dc.w $00e0,$0005 und dc.w $00e2,$0000 - nähere Er¬ 
klärungen dazu entnehmen Sie bitte dem Punkt 4.2. Play- 
fields). Um dies zu vermeiden und um ein überschreiben even¬ 
tuell, an dieser Stelle, befindlichen Daten zu verhindern, 
definieren wir unseren Bildschirmspeicher am Ende des Pro¬ 
gramms. Mit dem Befehl "blk.b" resevieren wir einen 10800 
Byte großen Platz, an dem wir später unser Bild ablegen wer¬ 
den. Um nun die Adresse des Bildschirmspeichers in die Cop¬ 
perliste einzutragen, bedienen wir uns folgender Befehle: 

move.l #bild,d0 
move do,pll+6 
swap dO 
move d0,pll+2 

Zuerst wird die Adresse des Bildschirmspeichers in do einge¬ 
lesen. Anschließend wird das Lowword in das Register $dff0e2 
( = pll+6) eingetragen. Daraufhin vertauschen wir die Words 
in do (swap dO) und tragen das Highword ein. 

Danach widmen wir uns dem Farbwechsel. Alle Copperbefehle 
sind genau diesselben, wie aus unserem vorhergehenden Bei¬ 
spiel. Der erste Befehl, der die Farbe in das Hintergrundre¬ 
gister schreibt (dc.w $0180,$0f00), wurde von schwarz (aus 
dem vorhergehenden Beipiel) auf Rot ausgebessert. Anschlie¬ 
ßend folgt ein Wait-Befehl und eine neuerliche Farbzuwei- 
sung, welche die Hintergrundfarbe auf weiß ändert. Es folgt 
ein weiterer Wait-Befehl und noch eine Farbzuweisung, welche 
die Farbe wieder auf Rot setzt. 

Dieses Beispiel zeigt, was alles mit dem Copper möglich ist, 
da man jede Rasterzeile einzeln ansprechen kann. Experimen¬ 
tieren Sie mit dem fertigen Listing, um etwas Übung mit dem 
Wait- und Move-Befehlen zu bekommen. 
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Copper-Demo 


s: 

move.1 

#bild,d0 



move 

d0,pll+6 



swap 

dO 



move 

do,pll+2 



move.w 

#$4000,$dff09a 

/Interrupts sperren; 
/Betriebssystem ausschalten 


move 

#$0020,$dff096 

/Sprites ausschalten 


move.1 

#copperl,$dff084 

/Copperliste aktivieren 

/ 

loop: 

move.1 

$dff004,d0 

/Warten auf Rasterstrahl 

and. 1 

#$fffoo,do 



cmp. 1 

#$00003000,dO 



bne.s 

loop 



btst 

#6,$bfe001 

/Maustaste gedrückt ? 


bne. s 

loop 

/Ja ? 

} 

ende: 

move 

#$c000,$dff09a 

/Interrupts erlauben 

e: 

rts 


/Programmende 


copperl: dc.w $008e,$3081 ;DIWSTRT 
dc.w $0090,$35cl ;DIWSTOP 
dc.w $0104,$0064 ;BPLCON2 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 
dc.w $0102,$0000 ;BPLCON1 
dc.w $0108,$0000 ;BPL1M0D 
dc.w $010a,$0000 ;BPL2MOD 
dc.w $0100,$1200 ;BPLCONO 
pll: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 

dc.w $0180,$0f00 ;COLOROO -> Rot 
dc.w $7001,$fffe ;WAIT 
dc.w $0180,$0fff ;COLOROO -> Weiß 
dc.w $e001,$fffe ;WAIT 
dc.w $0180,$0f00 ;COLOROO -> Rot 
dc.w $ffff,$fffe ;Warten auf unmögliche 
/Position 

bild: blk.b 10800,0 
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3.1.3. FARBSCROLLING MITTELS COPPER 


Nun wollen wir den Copper dazu bewegen, die Hintergrundfarbe 
nicht nur drei- oder viermal, sondern gleich hundertmal oder 
noch öfter zu ändern und zwar in jeder Zeile. Es gibt mehre¬ 
re Möglichkeiten, dies zu erreichen: Die eine wäre, wie im 
vorhergehenden Beispiel beschrieben, jeden Wait-Befehl per 
Hand in die Copperliste einzutragen. Ich glaube, ich brauche 
nicht zu erwähnen, wie lange das dauern würde. Eine weitaus 
schnellere, kürzere und angenehmere Methode ist es, dem Com¬ 
puter die Aufgabe der Copperlisten-Erstellung zukommen zu 
lassen. Wir definieren lediglich den Platz, wo die Copperli¬ 
ste abgelegt werden soll, sowie die Anzahl und Art der Be¬ 
fehle und lassen den Amiga die Liste berechnen. 

Das Listing ist fast identisch mit den bereits oben gezeig¬ 
ten Beispiel-Programmen, nur haben wir die Erstellung der 
Copperliste in eine eigene Unterroutine gepackt, die mittels 

bsr.s initcopper 

angesprungen wird. Anschließend wird der Buffer, den wir un¬ 
ter dem Namen "eins" in der Copperliste eingetragen haben, 
sowie der Buffer mit den Farbwerten in aO bzw. al eingele¬ 
sen. 


lea cins(pc),aO 

lea color(pc),al 

Jetzt wird die Anzahl der Zeilen in dO übergeben. Da wir in 
unserem Fall 100 Zeilen erstellen wollen, müssen wir 99 in 
dO schreiben. 99 deshalb, weil wir weiter unten im Listing 
mit dem Befehl "dbf" arbeiten und dieser nicht bei 0 sondern 
bei -1 verzweigt. 

move #99,dO 

Außerdem wird die Startzeile festgelegt, indem wir diese in 
dl schreiben. 

move #$6001,dl 

Nun können wir mit unserer Schleife beginnen und nacheinan¬ 
der die Befehle, die wir in unserer Copperliste haben wol¬ 
len, eintragen. 
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Zuerst wird das erste Befehlswort des Wait-Befehls (in dl) 
in den Copperlisten-puffer eingetragen ((a0)+ ) und an¬ 
schließend das zweite. 


Dann wird das erste Befehlswort des Move-Kommandos des Farb- 
registers (#$0180) definiert. Bevor wir nun die Farbe in den 
Buffer schreiben, überprüfen wir, ob der Buffer mit den 
Farbwerten schon fertig ausgelesen wurde. Wir fragen ganz 
einfach eine bestimmte Endekennung ab. In unserem Fall 
$ffff. Sind die Farben schon fertig ausgelesen, werden sie 
wieder neu an den Anfang der Liste gesetzt. Wenn nicht, wird 
die nächste Farbe in die Copperliste eingetragen. 


coppercopy: 

move 

move 

move 

cmp 

bne. s 

lea 

daher: move 


dl,(a0)+ 

#$fffe,(a0)+ 
#$0180,(a0)+ 
#$ffff,(al) 
daher 

color(pc),al 
(al)+,(a0) + 


Ehe die Schleife abgeschlossen werden kann, muß natürlich 
der Wait-Befehl erhöht werden, damit der Copper die nächste 
Farbe auch wirklich in der nächsten Zeile initialisiert. 
Dies geschieht durch einfaches Addieren von 


add #$0100,dl 


in dl. Nun können wir mit dem Befehl "dbf" die Schleife und 
mit "rts" den Rücksprung aus der Subroutine beenden. 


dbf dO,coppercopy 
rts 


Jetzt ist noch der, oben schon erwähnte, Buffer für die Cop¬ 
perliste anzulegen. Die Größe läßt sich ganz einfach berech¬ 
nen: Da wir vier Befehlswörter und 100 Zeilen verwenden, muß 
unser Buffer 400 words groß sein. 

Abschließend finden Sie das komplette Listing, welches 100 
Zeilen der Hintergrundfarbe, mittels Copper, mit jeweils ei¬ 
ner Farbe aus einem eigenen Farbbuffer beschreibt. 
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/ 

; Copper-Farben-Demo 


s: 



move.w 

#$4000,$dff09a 

/•Interrupts sperren; 
/•Betriebssystem ausschal 
ten 


move 

#$0020,$dff096 

;Sprites ausschalten 


move.1 
move.1 

#copperl,$dff084 
#bild,d0 

;Copperliste aktivieren 


move 

swap 

do,pll+6 
dO 

;Low word 


move 

d0,pll+2 

;High word 


bsr .s 

initcopper 

;Copperliste erstellen 

/ 

loop: 

move.1 
and. 1 
cmp. 1 
bne.s 

$dff004,d0 
#$fffOO,dO 
#$00003000,dO 
loop 

/Warten auf Rasterstrahl 


btst 

#6,$bfe001 

,-Maustaste gedrückt ? 


bne.s 

loop 

;Ja ? 

} 

ende: 

move 

#$c000,$dff09a 

/•Interrupts erlauben 

e: rts 

r 

initcopper: 


;Programmende 

lea 

lea 

move 

move 

coppercopy: 

move 

move 

move 

cmp 

bne.s 

lea 

cins(pc),a0 
color(pc),al 
#99,dO 
#$6001,dl 

dl,(a0)+ 
#$fffe,(a0)+ 
#$0180,(a0)+ 

#$ffff,(al) 
daher 

color(pc),al 

;Copperliste 

daher: 

/ 

move 

add 

dbf 

rts 

(al)+,(a0)+ 

#$0100,dl 
dO,coppercopy 
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; Farben für Copperliste 
color: 

de .W $000,$111,$222,$333,$444,$555,$666,$777,$888,$999 
dc.w $aaa,$bbb,$ccc,$ddd,$eee,$fff,$eee,$ddd,$ccc,$bbb 
de.w $aaa,$999, $888,$777,$666,$555,$444,$333,$222,$111 
dc.w $ffff 


/ 

copperl: 

dc.w 

$008e,$3081 

;DIWSTRT 


dc.w 

$0090,$35cl 

;DIWSTOP 


dc.w 

$0104,$0064 

;BPLCON2 


dc.w 

$0092,$0038 

;DDFSTRT 


dc.w 

$0094,$00d0 

;DDFST0P 


dc.w 

$0102,$0000 

;BPLC0N1 


dc.w 

$0108,$0000 

;BPL1MOD 


dc.w 

$010a,$0000 

;BPL2M0D 


dc.w 

$0100,$1200 

;BPLCONO 

pll: 

dc.w 

$ooeo,$oooo 

;BPL1PTH 


dc.w 

$00e2,$0000 

;BPL1PTL 


dc.w 

$0180,$0000 

;COLOR00 

eins: 

blk.w 400,0 

/Platzhalter 


dc.w 

$0180,$0000 

;COLOROO 


dc.w 

$ffff,$fffe 

/Warten auf unmögliche 
/Position 

bild: 

blk.t 

i 10800,0 

/Bildschirmspeicher 


Als nächstes wollen wir etwas "Leben" in unsere Copperliste 
bringen, indem wir unsere Farben "scrollen" (bewegen) las¬ 
sen. Wir wollen das Programm so verändern, daß die 100 Zei¬ 
len mit dem grauen Farbverlauf von unten nach oben wandern. 

Dazu verändern wir das vorhergehende Programm, indem wir aus 
der Unter-Routine "initcopper" die Zuweisung der Farben ent¬ 
fernen, da diese Aufgabe von einer anderen Unterroutine 
übernommen wird. Statt den Farbwerten "moven" wir eine Farbe 
(in unserem Fall schwarz) in die Copperliste. 
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Im Hauptprogramm, an der Stelle an welcher der Druck der 
linken Maustaste abgewartet wird, fügen wir eine neue Unter¬ 
routine ein, welche die Aufgabe hat, laufend die Farbwerte 
in der Copperliste zu verändern. Es sollen praktisch die 
Farben in der unten aufgelisteten Farbtabelle dargestellt 
und nach jedem Durchlauf um eine Zeile versetzt werden. 

Der Anfang ist ähnlich wie bei unserer alten "initcopper" 
Routine, denn zuerst wird sowohl der Copperlisten Buffer, 
als auch die zugehörigen Farben eingelesen und mit der Ende¬ 
kennung verglichen. Zum Copperlisten Buffer muß allerdings 6 
hinzuaddiert werden, da wir das zweite Befehlswort des er¬ 
sten Farbbefehls beschreiben wollen; vorher liegen nämlich 
das erste und zweite Befehlswort des Wait-Kommandos, sowie 
das erste der Farbzuweisung. Zusammen ergibt das 6 Byte um 
an die richtige Adresse zu gelangen. Der Farb-Buffer hat 
jetzt einen Zeiger erhalten (colorptr), der auf das aktuelle 
Farbword im Buffer zeigt. 

scrollcopper: 

lea cins+6(pc),a0 
move.l colorptr,al 
cmp #$ffff,(al) 
bne.s nocol 
move.l #color,colorptr 
move.1 colorptr,al 

Anchließend wird in dO die Anzahl der Zeile minus 1 überge¬ 
ben. 

nocol: move #99,dO 

Nun folgt die Schleife, in der die Farben in die Copperliste 
kopiert werden. Innerhalb dieser Schleife muß natürlich wie¬ 
der die Endekennung der Farbtabelle abgefragt werden, um die 
Farben am Ende der Tabelle wieder zurückzusetzten. 

scroll: move (al)+,(aO) 
add.l #8,a0 
cmp #$ffff,(al) 
bne.s weiter 
lea color,al 
weiter: dbf dO,scroll 
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Abgeschloßen wird die Routine durch Erhöhen des Farbzählers 
um 2. 

add.l #2,colorptr 
rts 

Dies sind die Änderungen, die für das Copper-Farbscrolling 
nötig sind. Das gesamte Listing ist unten nocheinmal zu se¬ 
hen. Experimentieren Sie mit den Routinen und verändern Sie 
diese nach Belieben, um den Umgang mit Wait- und Move- 
Befehlen zu üben. 


r 

; Copper-Farben-Demo "scrolling" 
/ 

/ 

s: 


move.w #$4000,$dff09a /Interrupts sperren; 

;Betriebssystem ausschal¬ 
ten 



move 

#$0020,$dff096 

;Sprites ausschalten 


move.1 

#copperl,$dff084 

;Copperliste aktivieren 


move.1 

#bild,do 

;Bildschirmspeicher 


move 

dO,pll+6 

;eintragen 
;Low word 


swap 

move 

dO 

d0,pll+2 

;High word 


bsr .s 

initcopper 

;Copperliste erstellen 

} 

loop: 

move.1 

$dff004,d0 

;Warten auf Rasterstrahl 

and. 1 
cmp.l 
bne.s 
bsr .s 

#$fff00,d0 
#$00003000,dO 
loop 

scrollcopper 

;Farben "scrollen" 


btst 

#6,$bfeOOl 

/Maustaste gedrückt ? 


bne.s 

loop 

; Ja ? 

/ 

ende: 

move 

#$c000,$dff09a 

/•Interrupts erlauben 

e: 

rts 


;Programmende 

/ 

initcopper: 

lea 

cins(pc),a0 

;Copperliste 


move 

move 

#99,dO 
#$6001,dl 
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coppercopy: 

move 

move 

move 

move 

add 

dbf 

rts 

/ 

scrollcopper: 
lea 

move.1 
cmp 
bne.s 
move.1 
move.1 

nocol: move 

scroll: move 
add. 1 
cmp 
bne.s 
lea 

weiter: dbf 

add. 1 
rts 


dl,(a0)+ 
#$fffe,(a0)+ 
#$0180,(a0 ) + 
#$0000,(a0)+ 
#$0100,dl 
dO,coppercopy 


cins+6(pc),a0 
colorptr,al 
#$ffff,(al) 
nocol 

#color,colorptr 
colorptr,al 
#99,dO 
(al)+,(a0) 

#8,a0 

#$ffff,(al) 
weiter 
color,al 
dO,scroll 
#2,colorptr 


;In jeder Zeile werden 
;die Farben neu in die 
;Copperliste eingetragen 


; Farben für Copperliste 
colorptr: dc.l color 

color: 

de.W $000,$111, $222,$333,$444,$555,$666,$777,$888,$999 
de.w $aaa,$bbb ,$ccc,$ddd, $eee,$fff,$eee ,$ddd,$ccc, $bbb 
dc.W $aaa,$999,$888,$777,$666,$555,$444,$333,$222,$111 
dc.w $ffff 
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copperl: dc.w $008e,$3081 ;DIWSTRT 
dc.W $0090,$35cl ;DIWSTOP 
dc.w $0104,$0064 ;BPLC0N2 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 
dc.w $0102,$0000 ;BPLC0N1 
dc.w $0108,$0000 ;BPL1MOD 
dc.w $010a,$0000 ;BPL2MOD 
dc.w $0100,$1200 ;BPLCONO 
pll: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 
dc.w $0180,$0000 ;COLORO0 
eins: blk.w 400,0 ;Platzhalter 

dc.w $0180,$0000 ;COLOROO 
dc.w $ffff,$fffe ;Warten auf unmögliche 
/Position 
7 

bild: blk.b 10800,0 ;Bildschirmspeicher 
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3.1.4. ERWEITERTES FARBSCROLLING 

Nun wollen wir uns eine weitere Variante des Farbscrollings 
ansehen. Da der Copper nicht nur auf vertikale Positionen 
(Zeilen) warten kann, sondern auch auf horizontale, ergeben 
sich viele Möglichkeiten tolle Effekte zu produzieren. Wir 
wollen die Hintergrundfarbe zweimal in einer Zeile ändern, 
eine Seite hinauf und die andere hinunter wandern lassen. 
Damit die Trennlinie zwischen beiden Seiten nicht langweilig 
gerade aussieht, werden wir sie Sinusförmig anlegen und zu¬ 
dem schneller bewegen, als die Farben. - Klingt kompliziert? 
Nein, im Gegenteil, es ist ein relativ einfacher Effekt mit 
großer Wirkung. Sehen Sie sich das fertige Listing zuerst 
an, und probieren Sie es aus, damit Sie das Programm besser 
verstehen. 


s: 


loop: 


ende: 

e: 


Copper - 

-Scroll-Effekt 


move.w 

#$4000,$dff09a 

/Interrupts sperren; 
/Betriebssystem ausschal 
ten 

move 

#$0020,$dff096 

/Sprites ausschalten 

move.1 

icopperl,$dff084 

/Copperliste aktivieren 

move.1 

#pic,d0 

/Bild-Adresse in dO 

move 

dO,planel+6 

/Low word eintragen 

swap 

dO 


move 

d0,planel+2 

/High word eintragen 

bsr .s 

initcopper 

/Copperliste initialisie 
ren 

move. 1 

$dff004,d0 

/Warten auf Rasterstrahl 

and.l 

#$fff00,d0 


cmp. 1 

#$00003000,d0 


bne.s 

loop 


bsr .s 

scrollcopper 

/Copper "scrollen" 

btst 

#6,$bfe001 

/Maustaste gedrückt ? 

bne. s 

loop 

/Ja ? 

move 

#$c000,$dff09a 

/Interrupts erlauben 

rts 


;Programmende 
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initcopper: 

lea cins(pc),aO ;Copperliste erstellen 

move #255,d0 
move #$0001,dl 
move #$0001,d2 
cloop: move dl,(a0)+ 

move #$fffe,(a0)+ 
move.l #$01800000,(a0)+ 
move d2,(a0)+ 
move #$fffe,(a0)+ 
move #$0180,(a0) + 
move #$0000,(a0)+ 
add #$0100,dl 
add #$0100,d2 
dbra dO,cloop 
rts 
7 

scrollcopper: 

lea cins+6(pc),a0 ;Farben "scrollen" 

lea cins+4078(pc),a2 
nomincol: 

move.l waitptr,al 
cmp.b #$00,(al) 
bne.s noend 
move.l #wait,waitptr 
move.l waitptr,al 
noend: move.l colorptr,a3 
cmp.w #$ffff,(a3) 
bne.s noendr 
move.l #color,colorptr 
move.l colorptr,a3 
noendr: move #254,dO 
doit: move (a3),(a0) 

move.b (al)+,d5 
sub.b #10,d5 
or.b #$01,d5 
move.b d5,3(a0) 
add.1 #$10,aO 

move (a3),(a2) 
sub.l #$10,a2 
cmp.b #$00,(al) 
bne.s noendl 
lea wait(pc),al 
noendl: add.l #2,a3 

cmp #$ffff,(a3) 
bne.s noendrl 
lea color(pc),a3 
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noendrl: 

dbra dO,doit 
add.l #2,waitptr 
add.l #2,colorptr 
rts 
7 

waitptr: de.1 wait 

wait: dc.b 150,144,137,132,126,120,115,110,105,100 

de.b 96,93,89,86,84,82,81,80,80,80,81,82,84,86 
dc.b 89,93,96,100,105,110,115,120,126,132,137 
dc.b 144,150,156,162,168,174,179,185,190,195 
dc.b 199,204,207,211,213,216,218,219,219,220 
dc.b 220,219,218,216,213,211,207,204,199,195 
dc.b 190,185,179,174,168,162,156,0,0 
7 

colorptr: dc.l color 

color: 

dc.w $f0f,$flf,$f2f,$f3f,$f4f,$f5f,$f6f,$f8f,$f9f,$faf,$fbf 
de.w $fcf,$fdf,$fef,$fff,$fff,$fef,$fdf,$fcf,$fbf,$faf,$f9f 
dc.w $£8f,$f6£,$£5f,$f4£,$f3f,$f2f,$fl£,$f0f,$ffff 
7 

copperl: dc.w $008e,$3081 ;DIWSTRT 
dc.w $0090,$35cl ;DIWSTOP 
dc.w $0104,$0064 ;BPLCON2 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 
dc.w $0102,$0000 ;BPLCON1 
dc.w $0108,$0000 ;BPL1M0D 
dc.w $010a,$0Q00 ;BPL2MOD 
dc.w $0100,$1200 ;BPLCON0 
planel: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 
dc.w $0180,$0000 ;COLOROO 
dc.w $0182,$0fff ;COLOROl 
eins: blk.w 2048,0 ;Copper-Buffer 

dc.w $ffff,$fffe ;Warten auf unmögliche 
;Position 
7 

pic: blk.b 10800,0 ;Buffer für Bildschirmspeicher 
7 
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Nun werden Sie feststellen, daß sich eigentlich nicht sehr 
viel zu den vorhergehenden Listings geändert hat. Nur die 
"scrollcopper" und "initcopper" Routinen sind etwas länger 
geworden. Bei "initcopper" wurden noch jeweils ein Wait- und 
ein Farb-Move-Befehl eingefügt. 

Um eine Farbe nach oben zu scrollen, haben wir einfach die 
Farbwerte in den eingelesenen Copperbuffer geschrieben. Da¬ 
mit sich die Farben in die andere Richtung bewegen, müssen 
wir lediglich die Farbwerte von hinten in die Copperliste 
eintragen. Dies geschieht durch: 

scrollcopper: 

lea cins+6(pc),a0 /Farben "scrollen" 

lea cins+4078(pc),a2 

Nun folgen die schon bekannten Abfragen der Endekennung und 
die Übergabe der zu bewegenden Zeilen in dO. 

nomincol: 

move.l waitptr,al 
cmp.b #$00,(al) 
bne.s noend 
move.1 #wait,waitptr 
move.l waitptr,al 
noend: move.l colorptr,a3 
cmp.w #$ffff,(a3) 
bne.s noendr 
move.1 #color,colorptr 
move.l colorptr,a3 
noendr: move #254,d0 

Jetzt wird die Schleife definiert, in der sowohl die Farb¬ 
werte als auch die Wait-Befehle in die Copperliste eingetra¬ 
gen werden. 

doit: move (a3),(a0) 

move.b (al)+,d5 
sub.b #10,d5 
or.b #$01,d5 
move.b d5,3(a0) 
add.l #$10,aO 
move (a3),(a2) 
sub.l #$10,a2 
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Wie vorher, folgen nun die Überprüfungen der Endekennungen 
und abschließend das Addieren zu den Färb- und Wait-Zeigern. 


noendl: 


noendrl: 


cmp.b 

#$00,(al) 

bne.s 

noendl 

lea 

wait(pc),al 

add.l 

#2 ,a3 

cmp 

#$ffff,(a3) 

bne.s 

noendrl 

lea 

color(pc),a3 

dbra 

d0,doit 

add.l 

#2,waitptr 

add.l 

rts 

#2,colorptr 


Das war das ganze Geheimnis. Sie sehen, daß man mit ganz 
einfachen und kurzen Programmen die erstaunlichsten Effekte 
erzielen kann. 


58 




KAPITEL 3 


DIE PROGRAMMIERUNG 


3.1.5. Die 3D-Rolle 


Als letzten Copper-Effekt, der auch in unserem Spiel Anwen¬ 
dung finden soll, wollen wir uns die Programmierung einer 
3D-Rolle ansehen. Diese Rolle wird in dem Spiel den Hinter¬ 
grund, quasi die hinterste Ebene bilden. Das hat überhaupt 
keinen Einfluß auf die Handlung des Spieles, sondern dient 
der optischen Gestaltung. 

Zur Aufgabenstellung: Es soll eine 30 Zeilen hohe, optisch 
dreidimensional wirkende, "Rolle" gebildet werden, die den 
Eindruck erwecken soll, als ob sie rotiere. Zudem soll sie 
auf dem Bildschirm von oben nach unten wandern. 

Beginnen wir wieder mit der Erstellung der Copperliste. An 
der Grundstruktur dieser Liste ändert sich nicht viel. Wir 
benötigen legiglich 30 Zeilen, in jeder Zeile einen Wait- 
und einen Move-Befehl. 

initcopper: lea cins(pc),a0 

move.l #29,do 
move.w #$c001,dl 
copycop: move.w dl,(a0)+ 

move.w #$fffe,(a0)+ 
move.w #$0180,(a0)+ 
move.w #$0000,(a0)+ 
add.w #$0100,dl 
dbra do,copycop 


Darüberhinaus müssen wir den Buffer für den benötigten Spei¬ 
cher in die Copperliste eintragen. Dieser ist bei 30 Zeilen 
zu je 4 word breiten Befehlen 120 words groß. 

Nun kommen wir zum schwierigeren Teil, nämlich der "scroll- 
copper"-Routine, die nicht nur die Rolle dreht, sondern auch 
den 3D-Effekt erzeugt und letztendlich auch noch bewegt. 
Sehen Sie sich doch zuerst das fertige Listing an, die Er¬ 
klärungen folgen danach. 
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scrollcopper: 

lea 

cins(pc),a0 


move.1 

parptr,a4 


cmp.w 

#$ffff,(a4) 


bne.s 

tres 


move.1 

#parabel,parptr 


move.1 

parptr(pc),a4 

tres: 

move.1 

shadeptr(pc),a3 


cmp.w 

#$ffff,(a3) 


bne.s 

qwex 


move.1 

#shade,shadeptr 


move.1 

shadeptr(pc),a3 

qwex: 

move.1 

colorptr(pc),a2 


cmp.w 

#$ffff,(a2) 


bne.s 

ewewx 


move.1 

#colors,colorptr 


move. 1 

colorptr(pc),a2 

ewewx: 

move 

#29,dO 


move. w 

(a4),d5 

iix: 

move 

d5,(aO) 


add 

#$0100,d5 


add.l 

#6 ,a0 


move 

(a2)+,d7 


move 

(a3)+,d6 


and.w 

d6,d7 


move 

d7, (aO) 


cmp.w 

#$ffff,(a2) 


bne.s 

werwerx 


lea 

colors(pc),a2 

werwerx: 

cmp.w 

#$ffff,(a3) 


bne.s 

trex 


lea 

shade(pc),a3 

trex: 

add.l 

#2 ,a0 


dbra 

d0,iix 


add.l 

#2,colorptr 


add.l 

rts 

#2,parptr 
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Im Wesentlichen ähnelt dieses Listing ebenfalls den schon 
besprochenen. Wie man einen 30 Zeilen hohen Farbverlauf dar¬ 
stellt und diesen zum "Scrollen” bringt, wissen Sie jetzt 
schon. Aber wie müssen wir nun Vorgehen, wenn wir den ge¬ 
wünschten 3D-Effekt erzielen wollen. 

Beginnen wir ganz von vorne: Wann sieht man quasi 3D? 

Dieser Effekt entsteht, wenn man die Ecken (in unserem Fall 
die oberen und unteren Zeilen unserer Rolle) etwas abdun¬ 
kelt. Dadurch erhält unsere Rolle einen plastischen Ein¬ 
druck. Aber wie programmiert man dies? 

Ganz einfach, man legt neben der Tabelle für die gewünschten 
Farben, eine zweite Tabelle, mit einer Abstufung von Grau¬ 
werten, an. Da die Rolle an den Rändern (gemeint sind die 
oberen und unteren Zeilen) dunkler werden soll, müssen die 
Grauwerte an diesen Stellen eben immer dunkler werden. 

Sehen wir uns zunächst die benötigten Farbtabellen an. 


/ 

colorptr: dc.l colors 

colors: dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
de.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $0fff,$0fff,$0fff,$0fff,$0fff 
dc.w $0fff,$0fff,$0fff,$0fff,$0fff 
dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $ffff 

r 

shadeptr: dc.l shade 
shade: 

dc.w $111,$222,$333,$444,$555,$666,$777,$888,$999,$aaa 
dc.w $bbb,$ccc,$ddd,$eee,$fff,$fff,$eee,$ddd,$ccc,$bbb 
dc.w $aaa,$999,$888,$777,$666,$555,$444,$333,$222,$111 
dc.w $ffff 

In der Tabelle "colors" sind die eigentlichen Farben für die 
Rolle, in diesem Fall Rot-Weiß-Rot, enthalten. In der zwei¬ 
ten Tabelle hingegen befinden sich die Farben, die von dunk¬ 
lem Grau, über helles Weiß bis wieder dunkles Grau reichen. 
Um nun den 3D-Effekt zu erzielen, verknüpfen wir diese bei¬ 
den Farbinformationen miteinander und schreiben das Ergebnis 
in die Copperliste. 
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move (a2)+,d7 
move (a3)+,d6 
and.w d6,d7 
move d7,(a0) 

In a2 befindet sich die eigentliche Farbe der Rolle, in a3 
der Verlauf für die Verdunkelung. Wir entnehmen diesen bei¬ 
den Registern je ein word und verknüpfen beide miteinander. 
Abschließend wird das Ergebnis in die in aO stehende Copper¬ 
liste eingetragen. 

Jetzt wollen wir unsere fertige Rolle noch auf und ab bewe¬ 
gen. Dieses Problem lösen wir ganz einfach, indem wir die 
Wait-Befehle verändern. Damit das Auf- und Abfallen nicht 
gleichmäßig geschieht, legen wir eine Tabelle mit unter¬ 
schiedlichen Waits ab. Befindet sich die Rolle oben am Moni¬ 
tor, so soll sie länger stehen bleiben, sich nach unten zu 
aber schneller bewegen. Dadurch entsteht der Eindruck, sie 
würde fallen. Sehen Sie dazu folgende Tabelle an: 

parptr: de.1 parabel 
parabel: 

de.w $3001,$3001,$3001,$3001,$3201,$3201,$3201,$3301,$3301 
dc.W $3301,$3501,$3501,$3501,$3601,$3601,$3601,$3701,$3701 
de.w $3701,$3801,$3801,$3801,$3901,$3901,$3901,$3a01,$3a01 
dc.w $3a01,$3b01,$3b01,$3b01,$3c01,$3c01,$3c01,$3d01,$3d01 
dc.w $3d01,$3e01,$3e01,$3e01,$3f01,$3f01,$3f01,$4001,$4001 
dc.w $4201,$4201,$4401,$4401,$4601,$4601,$4801,$4801,$4b01 
dc.w $4b01,$4e01,$4e01,$5101,$5101,$5401,$5401,$6001,$6001 
dc.w $7001,$7001,$8001,$8001,$9001,$9001,$a001,$a001,$b001 
dc.w $b001,$c001,$c001,$d001,$d001,$e001,$e001 
dc.w $e001,$e001,$d001,$d001,$c001,$c001,$b001,$b001,$a001 
dc.w $a001,$9001,$9001,$8001,$8001,$7001,$7001,$6001,$6001 
dc.w $5401,$5401,$5101,$5101,$4e01,$4e01,$4b01,$4b01,$4801 
dc.w $4801,$4601,$4601,$4401,$4401,$4201,$4201,$4001,$4001 
dc.w $3f01,$3f01,$3f01,$3e01,$3e01,$3e01,$3d01,$3d01,$3d01 
dc.w $3c01,$3c01,$3c01,$3b01,$3b01,$3b01,$3a01,$3a01,$3a01 
dc.w $3901,$3901,$3901,$3801,$3801,$3801,$3701,$3701,$3701 
dc.w $3601,$3601,$3601,$3501,$3501,$3501,$3301,$3301,$3301 
dc.w $3201,$3201,$3201,$3001,$3001,$3001,$3001 
dc.w $ffff 

Mit diesem kleinen Effekt wollen wir das Kapitel Copper be¬ 
enden. Es sollte Ihnen zeigen, welche Effekte allein nur mit 
dem Copper möglich sind. Wie für alles andere auch, gilt be¬ 
sonders hier, viel zu experimentieren, um die nötige Praxis 
zu erlangen. 
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3.2. DIE PLAYFIELDS 


Auf den vorhergehenden Seiten haben wir viel über die Arbeit 
mit dem Copper gehört. Nun wollen wir uns mit der Bild¬ 
schirmdarstellung befassen. Es gibt mehrere Möglichkeiten, 
Objekte bzw. Ebenen auf dem Bildschirm zu zeigen: 

o maximal 6 Planes auf bis zu zwei von einander 
unabhänigen Playfields, mit max. 4096 Farben. 

o 8 maximal 16 Punkte (Pixel) breite und beliebig 
hohe Objekte (Sprites), mit maximal drei Farben. 

(o beliebig große Objekte (Bobs) mit beliebig 
vielen Farben.) 

Zu beachten ist dabei, daß die sogenannten Bobs eigenlich 
keine eigenen Objekte sind, da sie nur mit Hilfe des Blit- 
ters, daher auch der Name Blitter Objects (Bobs), in das je¬ 
weilige Playfield hineinkopiert werden und somit ein Be¬ 
standteil desselben sind. Darum wurde dieser Punkt auch in 
Klammer gesetzt. 

Der Amiga stellt uns für einen Bildschirm (screen) maximal 
sechs Bitplanes zur Verfügung, mit denen wir unseren Screen 
gestalten können. Ebenso gibt es verschiedene Auflösungen, 
in denen diese Bitplanes, jedoch nur eingeschränkt, verwen¬ 
det werden können. Dazu kommen wir etwas später noch aus¬ 
führlicher. Außerden können diese Bitplanes, wie schon er¬ 
wähnt, zu zwei, voneinander unabhänigen, Playfields kombi¬ 
niert werden. Im Dual-Playfield-Modus kann ein Playfield ma¬ 
ximal drei Bitplanes besitzen. Playfield 1 erhält die unge¬ 
raden, Playfield 2 die geraden Planes. Wird eine ungerade 
Anzahl von Bitplanes verwendet, so erhält Playfield 1 um ei¬ 
ne Plane mehr. Durch diesen Modus ergeben sich, vor allem 
für Spiele, sehr viele Möglichkeiten, da diese Playfields 
wie zwei eigene Screens verwendet werden können. So ergibt 
sich die Möglichkeit, etwa im Vordergrund eine Anzeigentafel 
zu gestalten, während im Hintergrund die Landschaft bewegt 
wird (siehe Bild unten). Zudem kann man ein oder beide Play¬ 
fields überdimensionieren, das bedeutet, daß nur ein kleiner 
Teil im sichtbaren Bereich liegt und der Rest hineinbewegt 
(gescrollt) werden muß. 
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3.2.1. DIE PLAYFIELD-REGISTER 


Um überhaupt ein Playfield auf dem Bildschirm darstellen zu 
können, müssen einige Register initialisiert werden. Dazu 
liefert uns der Amiga die folgenden Speicherstellen: 


DIWSTRT ($dff08e) 

In diesem Register wird die Startposition des Fensters ein¬ 
gestellt. Der Beginn des Bildschirmfensters ist leider auf 
das linke obere Bildschirm-Viertel beschränkt, da die MSBs 
der vertikalen und horizontalen Anfangsposition als null an¬ 
genommen werden. 

Bits: 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 
V7 V6 V5 V4 V3 V2 VI V0 H7 H6 H5 H4 H3 H2 Hl HO 

Wie sie aus dem Schema ersehen können, bestimmen die Bits 
H0-H7 die horizontale Startposition und die Bits V0-V7 die 
vertikale. Für unsere Copperliste verwenden wir eine Start¬ 
position von vertikal 48 und horizontal 129, hexadezimal um¬ 
gerechnet ergibt das, einen Wert von $3081. 


DIWSTOP ($dff090) 

Im Gegensatz, zur gerade erklärten Funktion, wird in dieses 
Register die Endposition eingetragen. 

Bits: 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 
V7 V6 V5 V4 V3 V2 VI V0 H7 H6 H5 H4 H3 H2 Hl HO 

Ein weiterer Unterschied ist, daß in diesem Register Bit H8 
als 1 angenommen wird, wobei die Endposition in dem Bereich 
von 256 bis 458 liegen kann. Um eine vertikale Endposition 
sowohl größer als auch kleiner als 256 zu erhalten, hat man 
zu einem kleinen Trick gegriffen. Um das V8 Bit auf null zu 
setzten, schreibt man eine 1 in V7, will man V8 auf 1, so 
löscht man V7. Damit sind Positionen von 128 bis 312 mög¬ 
lich. Hat man nun den sichtbaren Bereich mittels dieser bei¬ 
den Register eingestellt, so wird außerhalb, sozusagen als 
Rahmen die Hintergrundfarbe dargestellt. 
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DDFSTRT ($dff092) 

Hat man dem Amiga mitgeteilt, wie groß das entsprechende 
Fenster sein soll, so muß man ihn darauf hinweisen, woher 
er die Daten aus dem Speicher holen soll. 

Die Display-Data-Start und Display-Window-Start Register 
sind voneinander abhängig. Da jede Bitplane im Lores-Modus 
alle 8 Zyklen eingelesen wird (im Hires-Modus sind es nur 4 
Zyklen), und die Hardware noch einen halben Buszyklus zum 
darstellen der Daten benötigt, besteht eine Differenz von 
8.5 Zyklen. Daher errechnet sich der richtige DDFSTRT fol¬ 
gendermaßen . 

DDFSTRT: $81/2 - 8.5 = $38 

Statt $81 ist der entsprechende Wert aus DIWSTRT einzuset¬ 
zen. 


DDFSTOP ($dff094) 

Um den Display-Data-Fetch-Stop Wert zu berechnen, nimmt man 
einfach die horizontale Auflösung, dividiert diese durch 2, 
subtrahiert 8 und addiert den DDFSTRT Wert. 

DDFSTOP: $38 + (320/2 - 8) = $d0 

$38 entspricht dem oben errechneten DDFSTRT Wert und 320 ist 
die Auflösung (Pixel pro Zeile). 


BPL1PTH - BPL6PTL ($dff0e0 - $dff0f8) 

Wir haben dem Amiga bereits mitgeteilt, wie groß unser 
sichtbares Fenster ist, jetzt fehlt nur noch die Adresse, an 
der die tatsächlichen Bitplane-Informationen im Speicher 
liegen. Dazu stehen uns 12 Register zur Verfügung, wobei im¬ 
mer zwei die Adresse für eine Bitplane enthalten. Nämlich in 
Low- und Highword getrennt. Je nachdem, wieviele Planes ver¬ 
wendet werden sollen, müssen die BPLxPTH / BPLxPTL Pointer 
verwendet werden. 
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BPLCONO ($dff100) 

Dieses Register hat eine wichtige Funktion bei der Bild¬ 
schirmdarstellung, denn es legt die Auflösungen fest und be¬ 
stimmt, wieviele Bitplanes verwendet werden. Sehen wir uns 
die einzelnen Bits etwas genauer an: 

Bit Name Funktion 


15 HIRES Ist dieses Bit auf 1 gesetzt, so wird der 
hochauflösende Modus (640 Punkte pro Zeile) 
eingeschalten. 

14 BPU2 Die Bits von BPU2, BPU1 und BPUO ergeben zu¬ 
sammen eine 3-Bit Zahl, die angibt, wieviele 
Planes eingeschalten sind. In hexadezimaler 
Schreibweise ist dies leicht zu erkennen, da 
an der ersten Stelle einfach eine Zahl von 1 
bis 6 eingetragen werden muß. Z.B.: $5000 
entspricht 5 aktivierten Planes. 

13 BPU1 siehe BPU2 

12 BPUO siehe BPU2 

11 HOMOD Will man den Hold-and-Modify Modus aktiv¬ 

ieren, so ist dieses Bit auf 1 zu setzten. In 
diesem Modus ist es möglich alle 4096 Farben 
des Amiga gleichzeitig darzustellen. 

10 DBPLF Ist dieses Bit auf 1, so ist der Dual-Play- 

field Modus aktiviert, und es werden die ge¬ 
raden und ungeraden Planes wie zwei unter¬ 
schiedliche Bildschirme behandelt. Die Bits 
10 und 11 dürfen nicht gemeinsam aktiv sein. 
Will man jedoch den Extra-Half-Bright Modus 
(64 Farben) aktivieren, so müssen die Bits 10 
und 11 auf 0 gesetzt und alle 6 Planes einge¬ 
schalten sein. 

9 COLOR Dieses Bit schaltet den Videofarbausgang von 

Agnus ein. 

8 GAUD Mit diesem Bit wird das Genlock Audio einge¬ 

schalten. 


67 





KAPITEL 3 


DIE PROGRAMMIERUNG 


7 - unbenützt 

6 - unbenutzt 


5 

4 

3 LPEN 

2 LACE 

1 ERSY 


0 


unbenutzt 

unbenutzt 

Will man einen Lightpen abfragen, so ist die¬ 
ses Bit auf 1 zu setzen. 

Um den Interlace Modus zu benutzen, muß die¬ 
ses Bit gesetzt werden. 

Hat dieses Bit den Wert 1, werden die An¬ 
schlüße fUr horizontale und vertikale Syn¬ 
chronisation von Ausgang auf Eingang umge¬ 
schalten. Dadurch kann das Amigabild durch 
externe Signale synchronisiert und zu jedem 
beliebigen Fernsehbild gemischt werden. Die¬ 
ses Bit wird vor allem von Genlock-Interfaces 
benutzt. 

unbenutzt 


BLPCON1 ($dff102) 

Dieses Register enthält die Stellungen der geraden und unge¬ 
raden Planes, die mittels diesem Register um 15 Pixel posi¬ 
tioniert werden können. Um die Arbeitsweise des Registers zu 
verstehen, ist hier die Bitbelegung aufgelistet: 

Bit: 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 
- P2 P2 P2 P2 PI PI PI PI 

Die Bits 8-15 sind frei. Die verbleibenden 8 Bits teilen 
sich die geraden und ungeraden Planes auf, wobei PI die ge¬ 
raden und P2 die ungeraden Planes symbolisieren. Dieses Re¬ 
gister wird auch zum Scrolling verwendet, aber dazu kommen 
wir etwas später. 
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BPLCON2 ($dff104) 

In diesem Register werden die Prioritäten der Sprites und 
Playfields bestimmt. Im Kapitel Sprites werden die Prioritä¬ 
ten noch ausführlich besprochen. 

Bit: 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 
-—-— pp S P SP SP SP SP SP 

Die Bits 7 bis 15 sind nicht belegt. PP, Bit 6 ist verant¬ 
wortlich für die Priorität der geraden zu den ungeraden Pla¬ 
nes. Es bestimmt, welche im Vorder- und welche im Hinter¬ 
grund liegen. Natürlich findet dieses Bit nur im Dual- 
Playfield Modus Verwendung. 


BPL1MOD ($dff108) 

Dieses Register bestimmt den Modulo Wert der ungeraden Pla¬ 
nes. Was ist nun der Modulo Wert? Mit diesem Wert ist es 
möglich, sogenannte rechteckige Speicherbereiche zu definie¬ 
ren. Auf dieses Prinzip werden Sie beim Amiga noch öfter 
stoßen, z.B.: beim Blitter. So ist es möglich, innerhalb ei¬ 
nes großen Speicherabschnittes, einen kleineren zu bestim¬ 
men, der eine eigene Höhe und Breite besitzt. Ein Beispiel 
verschafft Klarheit: Wir haben unser Bildschirmfenster mit 
einer Breite von 320 Pixel, das sind 40 Bytes (20 Worte), 
definiert. Das daraufliegende Playfield ist aber 640 Pixel 
breit (= 80 Byte = 40 Worte). In den BPLxPT Registern stehen 
nun die Startadressen unserer Planes. Da nach dem Einlesen 
einer Zeile dieser Wert vom Computer automatisch um 20 Worte 
erhöht wird, würde er an der falschen Adresse die nächste 
Zeile einiesen, denn richtigerweise müßte er 40 Worte hinzu¬ 
addieren. Steht nun ein Wert in den Modulo Registern, wird 
dieser automatisch hinzuaddiert, damit die nächste Zeile 
richtig eingelesen wird. Logischerweise errechnet sich der 
Modulo Wert einer Plane aus der Differenz der beiden unter¬ 
schiedlichen Zeilenlängen. 


BPL2MOD ($dff10a) 

Dies ist das zweite Modulo Register, das aber nur für die 
geraden Planes gültig ist. 
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COLOROO - COLOR31 ($dffl80 - $dfflbe) 

In diesen Registern werden den einzelnen Planes die Farben 
zugewiesen. Wie schon in vorhergehenden Kapiteln erwähnt, 
verwendet der Amiga die sogenannte 'Additive' Farbmischung. 
Es werden die drei Grundfarben Rot, Grün und Blau gemischt. 
Dadurch entstehen alle anderen Farben. Beim Amiga gibt es 
pro Farbe 16 Helligkeitsstufen. 16 hoch 3 ergibt 4096 ver¬ 
schiedene Farbtöne. Nun wird, je nach verwendeter Anzahl von 
Bitplanes und den darauf gesetzten oder gelöschten Bits, ei¬ 
ne Farbe gebildet, und dem Farbregister zugewiesen. 



Die entstehende 5-Bit Zahl wird 
in die Farbregister einffetra^en. 


Bild 4: Die FarbdarStellung 
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Wie schon erwähnt, gibt es 32 solcher Farbregister, die je 
einen 12 Bit Farbwert aufnehmen können. Das erste Farbregi¬ 
ster COLOROO dient als Hintergrund und, falls das Fenster 
kleiner ist, als Rahmenfarbe. Sehen wir uns kurz die Bit- 
Belegung eines Farbregisters an: 

Bit: 15 14 13 12 11 10 9 8 7 6 54 3 2 1 0 
- RRRRGGGG B B B B 

Die Bits 12 bis 15 sind nicht belegt. R, G und B entspricht 
einem jeweiligen Rot-, Grün- und Blau-Wert. Zum besseren 
Verständnis sehen wir uns einmal die hexadezimale Schreib¬ 
weise an, da diese etwas übersichtlicher ist. 



Rot-Anteil Grün-Anteil Blau-Anteil 


entspricht Jeweils einer Hex-Zahl 

von SÖ-Sf 


Bild 5: RGB-Werte 
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Wurde der Extra-Haifbrite-Modus aktiviert, stehen uns 64 
Farben zur Verfügung, obwohl wir nur 32 Farbregister haben. 
Ermöglicht wird dies durch den Gebrauch der sechsten Bitpla¬ 
ne. Wir erinnern uns: Bei 5 Bitplanes haben wir 32 Farben (2 
hoch 5 = 32). Nimmt man nun die sechste Bitplane hinzu, so 
erhält ma 2 hoch 6 = 64 Werte. Da aber nur 32 Farbregister 
zur Verfügung stehen, wird wieder mit einem Trick gearbei¬ 
tet. Soll nun eine Farbe der sechste Plane dargestellt wer¬ 
den, so wird diese mit der halben Helligkeit gezeigt. Da¬ 
durch benötigt man nur 32 Farbregister, kann aber dennoch 64 
Farben verwenden. 


3.2.2. DIE DARSTELLUNG VON PLAYFILEDS 

Nachdem wir die Register, die zur Bildschirmdarstellung 
wichtig sind, kennengelernt haben, befassen wir uns als 
nächstes mit der Representation auf dem Monitor. Es soll ein 
Bild mit nur einer Plane (=2 Farben) gezeigt werden. Dazu 
müssen wir dieses zuerst mit Hilfe eines Malprogramms, z.B. 
DPaint III zeichnen. Da Grafiken meistens als IFF-File abge¬ 
speichert werden, müssen wir diese in ein, für den Video- 
Chip, lesbares Format bringen. Das IFF-Format ist ein Stan¬ 
dard der sich besonders auf dem Amiga durchgesetzt hat, da 
es Bilder komprimiert abspeichert. Um diese aber für unsere 
Zwecke lesbar zu machen, müssen wir sie wieder zurück, in 
das sogenannte RAW-Format, konvertieren. Möglich ist dies 
mit dem im Verlag Gabriele Lechner erschienenen CONVERT- 
UTILITY, das diese Arbeit übernimmt. Ein weiteres aber lei¬ 
der etwas teures Programm ist das Malprogramm Pixmate. Wol¬ 
len Sie kein eigenes Bild erstellen, so können Sie die auf 
der Beispiel-Diskette mitgelieferten Bilder verwenden. 

Wie wird aber ein, im Speicher liegendes, Bild auf dem Bild¬ 
schirm dargestellt? Verwendet man nur eine Plane, wie in un¬ 
serem Fall 1, so entspricht jedes gesetzte Bit einem Bild¬ 
schirmpunkt. Es läßt sich jetzt auch ganz leicht errechnen, 
wieviel Platz das Bild im Speicher benötigt. Da unsere Gra¬ 
fik 320 Punkte breit ist, entspricht dies 320 Bit. 320 Bit 
sind 40 Byte, da ein Byte bekanntlich 8 Bit besitzt 
(320/8=40). Weil wir 256 Zeile anzeigen, ergibt dies einen 
Speicherbedarf von 40*256=10240 Byte. Diesen Bereich müssen 
wir mittels einer blk.b Anweisung in unserem Programm defi¬ 
nieren. Als nächstes sehen wir uns die Copperliste an, die 
für die Darstellung verantwortlich ist. Die ersten acht 
Words, dienen zur Einstellung der Bildschirmgröße. 
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copperl: dc.w $008e,$3081 ;DIWSTRT 
de.w $0090,$35cl ;DIWSTOP 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 

Nun folgt die Angabe der Bitplanes und des Modus mit dem Re¬ 
gister $dffl00: 

dc.w $0100,$1200 ;BPLCONO 

Die weiteren Register sind alle auf null zu setzten. 

dc.w $0102,$0000 ;BPLCON1 
dc.w $0104,$0000 ;BPLCON2 
dc.w $0108,$0000 ;BPL1MOD 
dc.w $010a,$0000 ;BPL2MOD 

Die nachfolgenden BPLxPT zeiger in der Copperliste zwar auf 
null, 

planel: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 

aber wie Sie vielleicht aus dem Listing ersehen, wird vor 
dem Start der richtige Wert in die Copperliste eingetragen. 
Das machen wir deshalb, weil unser Programm nicht immer an 
der gleichen Adresse liegt, und sich daher natürlich auch 
die Adresse des Bildbuffers ändert. Wäre die angegebene 
Adresse fix, so würde das Bild nicht korrekt angezeigt wer¬ 
den. Daher wird die neue Adresse wie folgt in die Copperli¬ 
ste eingetragen: 

move.l #pic,d0 ;Bild-Adresse in dO 

move d0,planel+6 ;Low word eintragen 

swap dO 

move d0,planel+2 ;High word eintragen 

Zuerst wird das Low-Word in das Register $dff0e2 und an¬ 
schließend das High-Word in $dff0e0 geschrieben. Abschlie¬ 
ßend bestimmen wir die Farben, die unsere Plane haben soll. 
In $dffl80 wird die Hintergrundfarbe ($000 = Schwarz) einge¬ 
tragen, die an allen Stellen, an denen die Bits unserer Pla¬ 
ne gelöscht sind, sichtbar wird. An den anderen Positionen, 
an denen Bits gesetzt sind, erscheint die Farbe des Regi¬ 
sters $dffl82 ($fff = Weiß). Unser Listing ist somit fertig. 
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Wenn Sie das Listing ausprobieren, müssen Sie in das fertig 
assemblierte Programm das Bild von der Diskette in den Spei¬ 
cher, und zwar genau an die mit "pic" definierte Adresse la¬ 
den, damit es überhaupt sichtbar wird. Beim Seka-Assembler 
übernimmt dies das RI (Read Image) Kommando, mit dem fehlen¬ 
de Module an bestimmte Adressen geladen werden können. 

SEKA>ri (RETURN) 

FILENAME>dfO:picture (RETURN) 

BEGIN>pic (RETURN) 

END> (RETURN) 

Haben Sie das obenstehende Kommando ausgeführt, wird das 
Bild von der Diskette nachgeladen und in unserem Bildschirm¬ 
speicher abgelegt. Nun kann das Programm mit dem 11 j" Komman¬ 
do angesprungen und das fertige Bild betrachtet werden. 


; Darstellung eines Bildes 320*256; 


s: 

move.w #$4000,$dff09a 

move #$0020,$dff096 

move.l #copperl,$dff084 
move.l #pic,d0 
move d0,planel+6 
swap dO 

move d0,planel+2 


loop: 

move.1 

$dff004,d0 


and.l 

#$fff00,d0 


cmp.l 

#$00003000,dO 


bne.s 

loop 


btst 

#6,$bfe001 


bne.s 

loop 

/ 

ende: 

move 

#$c000,$dff09a 

e: 

rts 



lPlane = 2Farben 


Interrupts sperren; 
/Betriebssystem ausschalten 
/Sprites ausschalten 
/Copperliste aktivieren 
;Bild-Adresse in dO 
;Low word eintragen 

;High word eintragen 

/Warten auf Rasterstrahl 


/Maustaste gedrückt ? 
/Ja ? 

/Interrupts erlauben 
;Programmende 
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copperl: 


planel: 


dc.w $008e,$3081 
dc.w $0090,$35cl 
dc.w $0092,$0038 
dc.w $0094,$00d0 
dc.w $0100,$1200 
dc.w $0102,$0000 
dc.w $0104,$0000 
dc.w $0108,$0000 
dc.w $010a,$0000 
dc.w $00e0,$0000 
dc.w $00e2,$0000 
dc.w $0180,$0000 
dc.w $0182,$0fff 
dc.w $ffff,$fffe 


;DIWSTRT 
;DIWSTOP 
;DDFSTRT 
;DDFSTOP 
;BPLCONO 
;BPLC0N1 
;BPLCON2 
;BPL1MOD 
;BPL2MOD 
;BPL1PTH 
;BPL1PTL 
;COLOROO 
; COLOROl 
; Warten auf 
/Position 


unmögliche 


pic: 


blk.b 10240 /Buffer für Bild 


Wie funktioniert die Darstellung eines Bildes mit vielen 
Farben? Dazu benötigen wir mehrere Planes. Wir haben festge¬ 
stellt, daß jedes gesetzte Bit einer Farbe entspricht. Al¬ 
lerdings benötigen wir nicht für jede Farbe eine neue Bit¬ 
plane, sondern die Anzahl der zu verwendenden Farben steigt 
exponentiell. Wie schon oben erwähnt gibt es maximal 6 Bit¬ 
planes. Das heißt, maximal 2 hoch 6 = 64 Farben, Ausnahme 
ist der Hold-and-Modify Modus, kurz HAM genannt. Bei fünf 
Bitplanes, wie unser nächstes Beispiel zeigt, gibt es 32 
verschiedene Farben, und wir verwenden alle 32 Farbregister. 

Wie aus dem Listing zu erkennen ist, wurde erstens der Bild¬ 
schirmspeicher (pic) vergrößert. Da wir 5 Planes verwenden, 
benötigen wir auch fünfmal soviel Speicher (10240*5=51200). 
Außerdem wurde ein Label mit der Größe einer Plane defi¬ 
niert. Wie wir bereits wissen, liegen die 5 Planes hinter¬ 
einander im Speicher. Beim Eintrag in die Copperliste wird 
zum Datenregister dO die Größe (10240) hinzuaddiert, um die 
Adresse der nächsten Plane zu erhalten. 

Die Copperliste selbst wurde natürlich um die restlichen 
Färb- und BPLxPT-Register erweitert. Darüberhinaus wurde die 
Anzahl im BPLCONO-Register auf 5 erhöht. 

dc.w $0100,$5200 ;BPLCONO 
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Sonst ist alles gleich geblieben. Assemblieren Sie das Pro¬ 
gramm und lesen Sie das Bild an der vorgesehenen Adresse 
ein. 


/ 

; Darstellung eines Bildes 320*256; SPlanes = 32Farben 


move.w 

#$4000,$dff09a 

/Interrupts sperren; 
/•Betriebssystem ausschalten 

move 

#$0020,$dff096 

;Sprites ausschalten 

move.1 

#copperl,$dff084 

;Copperliste aktivieren 

move.1 

#pic,d0 

;Bild-Adresse in dO 

move 

dO,planel+6 

;Low word eintragen 

swap 

dO 


move 

dO,planel+2 

;High word eintragen 

swap 

dO 


add.l 

#size,d0 

/•Größe addieren 

move 

dO,plane2+6 

;Low word eintragen 

swap 

dO 


move 

dO,plane2+2 

;High word eintragen 

swap 

dO 


add.l 

#size,d0 

/•Größe addieren 

move 

dO,plane3+6 

;Low word eintragen 

swap 

dO 


move 

dO,plane3+2 

;High word eintragen 

swap 

dO 


add.l 

#size,d0 

;Größe addieren 

move 

d0,plane4+6 

;Low word eintragen 

swap 

dO 


move 

d0,plane4+2 

;High word eintragen 

swap 

dO 


add.l 

#size,d0 

;Größe addieren 

move 

dO,plane5+6 

;Low word eintragen 

swap 

dO 


move 

d0,plane5+2 

;High word eintragen 

move. 1 

$dff004,d0 

/•Warten auf Rasterstrahl 

and.l 

#$fff00,d0 


cmp. 1 

#$00003000,d0 


bne.s 

loop 


btst 

#6 r $bfeOOl 

/•Maustaste gedrückt ? 

bne.s 

loop 

;Ja ? 
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/ 

ende: 
e: 

/ 

copperl: 


planel: 
plane2: 
plane3: 
plane4: 
planes: 


move #$c000,$dff09a 

rts 


Interrupts erlauben 
;Programmende 


dc.w $008e,$3081 
de.w $0090,$35cl 
dc.w $0104,$0000 
dc.w $0092,$0038 
dc.w $0094,$00d0 
dc.w $0102,$0000 
dc.w $0108,$0000 
dc.w $010a,$0000 
dc.w $0100,$5200 
dc.w $00e0,$0000 
dc.w $00e2,$0000 
dc.w $00e4,$0000 
dc.w $00e6,$0000 
dc.w $00e8,$0000 
dc.w $00ea,$0000 
dc.w $00ec,$0000 
dc.w $00ee,$0000 
dc.w $00f0,$0000 
dc.w $00f2,$0000 
dc.w $0180,$0000 
dc.w $0182,$0fff 
dc.w $0184,$08c3 
dc.w $0186,$0a67 
dc.w $0188,$0bcb 
dc.w $018a,$0875 
dc.w $018c,$054c 
dc.w $018e,$0b5a 
dc.w $0190,$0865 
dc.w $0192,$0645 
dc.w $0194,$00ff 
dc.w $0196,$0ff0 
dc.w $0198,$0fOf 
dc.w $019a,$000f 
dc.w $019c,$00f0 
dc.w $019e,$0f00 
dc.w $01a0,$0000 
dc.w $01a2,$0111 
dc.w $01a4,$0222 
dc.w $01a6,$0333 


;DIWSTRT 
;DIWSTOP 
;BPLCON2 
;DDFSTRT 
;DDFSTOP 
;BPLC0N1 
;BPL1M0D 
;BPL2MOD 
;BPLCONO 
;BPL1PTH 
;BPL1PTL 
;BPL2PTH 
;BPL2PTL 
;BPL3PTH 
;BPL3PTL 
;BPL4PTH 
;BPL4PTL 
;BPL5PTH 
;BPL5PTL 
;COLOROO 
;COLOROl 
;COLOR02 
;COLOR03 
;COLOR04 
;COLOR05 
;COLOR06 
;COLOR07 
;COLOR08 
;COLOR09 
;COLORIO 
;COLOR11 
;COLOR12 
;COLOR13 
; COLOR14 
;COLOR15 
;COLOR16 
;COLOR17 
;COLOR18 
;COLOR19 
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size 
pic: 


de.w $01a8,$0444 ;COLOR20 
dc.w $01aa,$0555 ;COLOR21 
dc.w $01aC/$0666 ;COLOR2 2 
de.w $01ae,$0777 ;COLOR23 
dc.w $01b0,$0888 ;COLOR24 
dc.w $01b2,$0999 ;COLOR25 
dc.w $01b4,$0aaa ;COLOR26 
dc.w $01b6,$0bbb ;COLOR27 
dc.w $01b8,$0ccc ;COLOR28 
dc.w $01ba,$0ddd ;COLOR29 
dc.w $01bc,$0eee ;COLOR30 
dc.w $01be,$0fff ;COLOR31 
dc.w $ffff,$fffe ;Warten auf unmögliche 
;Position 

320/8*256 

blk.b 51200 ;Buffer für Bild 
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3.2.3. DER "SCHUNKEL”-EFFEKT 


Sehen wir uns das Register BLPCON1 ($dffl02) noch einmal et¬ 
was näher an. Wie schon in der Register-Beschreibung erwähnt 
wurde, dient es zum horizontalen Verschieben der Bitplanes. 
Die Bits 0-3 sind für die geraden, die Bits 4-7 für die un¬ 
geraden Planes zuständig. Wir können dieses Register für ei¬ 
nen interessanten Effekt verwenden: Die Bildschirmabbildung 
soll hin- und her- ,, geschunkelt" werden. Wir wissen inzwi¬ 
schen, daß eine Bewegung bis zu 15 Pixel nach rechts erzielt 
werden kann. Jetzt soll das dargestellte Bild von unten nach 
oben, mit einer sinus-förmigen Wellenlinie, durchlaufen wer¬ 
den. Dadurch entsteht der Eindruck, daß das Bild durchge¬ 
schüttelt (geschunkelt) wird. 

Wie funktioniert dies? Zuerst müssen wir eine, wie vom Farb- 
scrolling her bekannte, Copperliste erstellen, nur wird nach 
jedem Wait-Befehl, der auf die nächste Zeile wartet, nicht 
ein Farbregister eingetragen, sondern das BLPCON1-Register. 
Damit wären die Vorbereitungen für den Schunkel-Effekt be¬ 
reits getroffen. Wir haben jetzt eine Copperliste erstellt, 
in welcher in jeder Zeile ein neuer Move-Befehl steht. Wir 
können dadurch in jeder Zeile von neuem bestimmen, um wie¬ 
viele Punkte unser Bildschirm verschoben werden soll. Dies 
geschieht in der Unterroutine ,, scrollcopper ,, . 

Hier wird ein Sinus-Wert aus der Tabelle "sinus" entnommen 
und in BLPCON1 eingetragen. Damit es so aussieht, als ob die 
Sinus-Wellen nach oben wandern, müssen wir den Zeiger auf 
diese Tabelle (sinusptr), nach jedem Durchlauf, um 2 erhö¬ 
hen. 

Die vielen Null-Byte am Anfang der Tabelle sind dafür ge¬ 
dacht, daß das Bild nicht ununterbrochen "geschunkelt" wird, 
sondern einige Zeit stillsteht, und erst anschließend mit 
dem Effekt wieder begonnen wird (denn 0 bedeutet keine Ver¬ 
schiebung! ). 
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/ 

; Darstellung eines Bildes 320 
; mit "Schunkel-Effekt H 


move.w #$4000,$dff09a 

move #$0020,$dff096 

move.l #copperl,$dff084 
move.l #pic,d0 
move d0,planel+6 
swap dO 

move d0,planel+2 
swap dO 
add.l #size,d0 
move d0,plane2+6 
swap dO 

move d0,plane2+2 
swap dO 
add.l #size,d0 
move d0,plane3+6 
swap dO 

move d0,plane3+2 
swap dO 
add.l #size,d0 
move d0,plane4+6 
swap dO 

move d0,plane4+2 
swap dO 
add.l #size,d0 
move d0,plane5+6 
swap dO 

move d0,plane5+2 
bsr.s initcopper 

} 

loop: move.l $dff004,d0 
and.l #$fff00,d0 
cmp.l #$00003000 ,do 
bne.s loop 
bsr.s scrollcopper 
btst #6 7 $bfe001 
bne.s loop 
7 

ende: move #$c000,$dff09a 


256; 5Planes = 32Farben 


/Interrupts sperren; 
/Betriebssystem ausschalten 
/Sprites ausschalten 
/Copperliste aktivieren 
/Bild-Adresse in dO 
/Low word eintragen 

/High word eintragen 

/Größe addieren 
/Low word eintragen 

/High word eintragen 

/Größe addieren 
/Low word eintragen 

/High word eintragen 

/Größe addieren 
/Low word eintragen 

/High word eintragen 

/Größe addieren 
/Low word eintragen 

/High word eintragen 
/Copperliste initialisieren 

/Warten auf Rasterstrahl 


/Bild n schunkeln H 
/Maustaste gedrückt ? 
/Ja ? 

/Interrupts erlauben 
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e: rts 

7 

initcopper: 

lea cins(pc),aO 
move.w #355,d0 
move.w #$00el,dl 
coploop: 

move.w dl,(a0)+ 
move.w #$fffe,(aO)+ 
move.w #$0102,(a0) + 
move.w #$0000,(a0)+ 
add.w #$0100,dl 
dbra dO,coploop 

rts 
7 

scrollcopper: 

lea cins+6(pc),a0 
move.1 sinusptr,al 
cmp.b #$ff,(al) 
bne.s nosinus 
move.1 #sinus,sinusptr 
move.1 sinusptr,al 
nosinus: 

move.w #355,dO 
sinn: moveq #0,d3 

move.w (al)+,d3 
move.w d3,d4 
lsl.b #4,d3 
add.w d4,d3 
move.w d3,(a0)+ 
add.l #6,a0 
cmp.b #$ff,(al) 
bne.s nosin 
lea sinus(pc),al 

nosin: 

dbra d0,sinn 

add.1 #$ 2,sinusptr 

rts 

/ 

sinusptr: dc.l sinus 


;Programmende 


;Copperliste erstellen 


;Bild "schunkeln” 

;Die Sinus-Daten werden 
;aus der Tabelle eingelesen 
;und in jeder Zeile in 
;BLPC0N1 ($dff102) Register 
/geschrieben. 


; Sinus-Daten 
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sinus: 

dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
dc.b 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 

t 

dc.b 1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
de.b 1,1,1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
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de.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,2,2,3,3,4,4,5,5,6,6 

de.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b 1,1,1,1,2,2,3,3,4,4,5,5,6,6 

dc.b 7,8,8,9,9,10,10,11,11,12,12,13,13,13,13,14,14,14,14 
dc.b 14,14,14,13,13,13,13,12,12,11,11,10,10,9,9,8,8 
dc.b 7,6,6,5,5,4,4,3,3,2,2,1,1,1,1,0,0,0,0,0,0,0 
dc.b $FF,0 

/ 

copperl: 

de.w $008e,$3081 ;DIWSTRT 
de.W $0090,$35cl ;DIWSTOP 
dc.w $0104,$0064 ;BPLCON2 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 
dc.w $0102,$0000 ;BPLCON1 
dc.w $0108,$0000 ;BPL1M0D 
dc.w $010a,$0000 ;BPL2MOD 
dc.w $0100,$5200 ;BPLCONO 
planel: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 
plane2: dc.w $00e4,$0000 ;BPL2PTH 

dc.w $00e6,$0000 ;BPL2PTL 
plane3: dc.w $00e8,$0000 ;BPL3PTH 

dc.w $00ea,$0000 ;BPL3PTL 
plane4: dc.w $00ec,$0000 ;BPL4PTH 

dc.w $00ee,$0000 ;BPL4PTL 
plane5: dc.w $00f0,$0000 ;BPL5PTH 

dc.w $00f2,$0000 ;BPL5PTL 
dc.w $0180,$0000 ;COLOROO 
dc.w $0182,$0fff ;COLOR01 
dc.w $0184,$08c3 ;COLOR02 
dc.w $0186,$0a67 ;COLOR03 
dc.w $0188,$0bcb ;COLOR04 
dc.w $018a,$0875 ;COLOR05 
dc.w $018c,$054c ;COLOR06 
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dc.w 

$018e,$0b5a 

;COLOR07 

dc.w 

$0190,$0865 

;COLOR08 

dc.w 

$0192,$0645 

;COLOR09 

dc.w 

$0194,$00ff 

;COLOR10 

dc.w 

$0196 , $0ff0 

;COLORll 

dc.w 

$0198,$0fOf 

;COLOR12 

dc.w 

$019a,$000f 

;COLOR13 

de .w 

$019c,$00f0 

;COLOR14 

dc.w 

$019e,$0f00 

;COLOR15 

dc.w 

$01a0,$0000 

;COLOR16 

dc.w 

$01a2,$0111 

/COLOR17 

dc.w 

$01a4,$0222 

;COLOR18 

dc.w 

$01a6,$0333 

;COLOR19 

dc.w 

$01a8,$0444 

;COLOR20 

dc.w 

$01aa,$0555 

;COLOR21 

dc.w 

$01ac,$0666 

;COLOR22 

dc.w 

$01ae,$0777 

;COLOR23 

dc.w 

$01b0,$0888 

;COLOR24 

dc.w 

$01b2,$0999 

;COLOR25 

dc.w 

$01b4,$0aaa 

;COLOR26 

dc.w 

$01b6,$0bbb 

;COLOR27 

dc.w 

$01b8,$0ccc 

;COLOR28 

dc.w 

$01ba,$0ddd 

;COLOR29 

dc.w 

$01bc,$0eee 

;COLOR30 

dc.w 

$01be,$0fff 

;COLOR31 

eins: blk.w 1424,0 

; n Schunkel ,f -Buf fer 

dc.w 

$ffff,$fffe 

;Warten auf unmögliche 



/•Position 

size = 320/8*256 


pic: blk.b 51200,0 

r 

;Buffer für Bild 
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3.2.4. SCROLLING 


Vertikales Scrolling 

Nachdem wir uns die grundlegenden Informationen über den 
Aufbau der Playfields und deren Verwendung zueigen gemacht 
haben, kommen wir nun zu einem, bei weitem interessanteren 
Kapitel, dem Bewegen derselben in alle Richtungen. Der Fach¬ 
ausdruck dafür ist 'Scrolling'. 

Wir unterscheiden zwei verschiedene Bewegungsrichtungen - 
die horizontale und die vertikale. Beginnen wir mit der ein¬ 
facheren von beiden, die in unserem Spiel vorkommt, der ver¬ 
tikalen Richtung. 

Zuerst müssen wir uns einig sein, welches Format die zu 
scrollende Bitplane, bzw. Bitplanes haben sollen. Nehmen wir 
als Beispiel gleich eine Plane aus unserem Spiel an. Da wir 
dabei zwei verschiedene Hintergrund Playfields (im Dusal- 
Playfield-Modus) verwenden, die in unterschiedlichen Ge¬ 
schwindigkeiten bewegt werden sollen, nehmen wir zur besse¬ 
ren Demonstration die kleinere von beiden. Sie besteht aus 3 
Bitplanes (8 Farben) und hat die Größe 320 mal 400. Wenn Sie 
ein eigenes Playfield malen wollen verwenden Sie bitte ein 
beliebiges Malprogramm, z.B. DPAINT III, und ändern Sie die 
Fenstergröße und die Anzahl der Planes (Farben). Anschlie¬ 
ßend können Sie Ihrer Phantasie bei der Gestaltung der Gra¬ 
fiken freien Lauf lassen. Haben Sie diesen Schritt beendet, 
speichern Sie Ihr Bild auf einer Diskette ab und konvertie¬ 
ren es mit einem Konvertierprogramm, z.B. CONVERT-UTILITY 
aus dem Verlag Gabriele Lechner, vom IFF in das RAW Format. 
Danach sollte Ihr Playfield eine Größe von 16000 Bytes auf 
der Diskette belegen (Größe einer Plane 320 durch 8 mal 400 
Zeilen = 16000). Wollen Sie sich diesen aufwendigen Schritt 
vorerst ersparen, so können Sie die auf der Programmdiskette 
abgespeicherten Grafiken verwenden. 

Haben wir ein fertiges Bild, können wir zur eigentlichen Ar¬ 
beit übergehen. Wie wir bereits wissen, wird nicht das Play¬ 
field selbst verschoben, sondern der Bildschirmausschnitt. 
Dieser wird von uns in den Zeigern auf die Planes festgelegt 
(BPLxPT). Das bedeutet wir müssen bei vertikalem Scrolling 
lediglich diese Zeiger um eine Zeile erhöhen und schon wan¬ 
dert unsere Plane über den Schirm. 
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Da eine Zeile 320 Punkte breit ist müssen wir die BPLxPT um 
40 Byte erhöhen, damit wir in die nächste Zeile gelangen. 
Wollen wir ein Scrolling in die Gegenrichtung bewirken, so 
müssen wir diesen Wert subtrahieren. 

Ein kleines Problem stellt sich uns noch: Da das Low- und 
High-Word der BPLxPT-Pointer getrennt in die Register 
SdffOeO und $dff0e2 (nur für Plane 1) geschrieben werden, 
müssen wir aufpassen, daß der Übertrag in unserem Scrolling 
ebenfalls beachtet wird. Nehmen wir folgende Werte an: 

dc.w $00e0,$0005 
dc.w $00e2,$ff00 

Wird nun solange in $00e2 addiert, bis dieses Register den 
Wert $60000 übersteigt, müssen wir die entsprechende Zahl 
auch in $00e0 korrigieren. Um eine ständige Überprüfung zu 
vermeiden, lesen wir die Zahl zuerst aus den Registern 


lea 

pll+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),d0 

add.l 

#40,do 


und bilden in einem Datenregister (in unserem Fall do) ein 
Long-Word mit der richtigen Adresse der Bitplane und addie¬ 
ren/subtrahieren mit einem Long-Word-Befehl. Somit wird je¬ 
der Übertrag automatisch korrekt ausgeführt. Das Ergebnis 
der Rechnung wird wieder in High- und Low-Word zerlegt und 
in die passenden Register der Copperliste eingetragen. 


scrolling__kl: 


tst .b 

kennbytel 

;Scrolling des kleinen 

beg.s 

rauf 

;Playfields 

lea 

pll+2(pc),al 

;(Hintergrund) 

move 

(al),d0 


swap 

do 


move 

4(al),d0 


add.l 

#40,dO 


move 

d0,4(al) 


swap 

dO 


move 

dO, (al) 
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rauf: 


lea 

pl2+2(pc),al 

move 

(al),d0 

swap 

do 

move 

4(al),d0 

add.l 

#40,dO 

move 

d0,4(al) 

swap 

dO 

move 

dO,(al) 

lea 

pl3+2(pc),al 

move 

(al),d0 

swap 

do 

move 

4(al),d0 

add.l 

#40,do 

move 

d0,4(al) 

swap 

dO 

move 

dO,(al) 

add 

#1,countl 

cmp 

#145,countl 

bne.s 

noscroll 

clr .b 

kennbytel 

add 

#1,countl 

lea 

pll+2(pc),al 

move 

(al),d0 

swap 

do 

move 

4(al),d0 

sub. 1 

#40,do 

move 

d0,4(al) 

swap 

dO 

move 

do,(al) 

lea 

pl2+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),d0 

sub. 1 

#40,dO 

move 

dO, 4 (al) 

swap 

dO 

move 

dO,(al) 
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lea pl3+2(pc),al 
move (al),dO 
swap dO 
move 4(al),d0 
sub.l #40,dO 
move d0,4(al) 
swap dO 
move d0,(al) 
cmp #290,countl 

bne.s noscroll 
clr countl 

move.b #$01,kennbytel 
noscroll: rts 


Um die beiden Richtungen unterscheiden zu können, haben wir 
zwei Labels definiert, in denen vermerkt wird, in welche 
Richtung die Planes gerade bewegt werden. Dazu dient "kenn- 
bytel". Ist darin eine 1 enthalten, so wird das Playfield 
hinunter-, ist eine 0 enthalten so wird es hinauf-bewegt. 
Außerdem wurde der Zähler "countl” definiert, in dem die 
schon "gescrollten" Zeilen vermerkt werden. Wird eine vorge¬ 
gebene Anzahl erreicht, so wechselt durch Setzen oder Lö¬ 
schen von "kennbytel" die Richtung. 

Als nächstes wollen wir die, schon erwähnte zweite, größere 
Ebene unseres Spiels ebenso scrollen, wie die erste, nur et¬ 
was schneller. Um das Playfield doppelt so schnell zu bewe¬ 
gen, addieren wir nicht eine sondern zwei Zeilen zu den 
BPLxPT. Außerdem muß natürlich die Anzahl der Zeilen im 
”count2" anders definiert werden, da die zweite Plane 600 
Zeilen lang ist. 


scrolling_gr: tst.b kennbyte2 ;Scrolling des großen 

beq.s rauf2 ;Playfields 
lea plll+2(pc),al ;(Vordergrund) 
move (al),d0 
swap dO 
move 4(al),d0 

add.l #80,dO 
move d0,4(al) 
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rauf2: 


swap 

dO 

move 

dO,(al) 

lea 

pl22+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),d0 

add.l 

#80,dO 

move 

dO,4(al) 

swap 

dO 

move 

dO,(al) 

lea 

pl33+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),d0 

add.l 

#80,dO 

move 

d0,4(al) 

swap 

dO 

move 

dO,(al) 

add 

#1,count2 

cmp 

#173,count2 

bne.s 

noscroll2 

clr .b 

kennbyte2 

add 

#1,count2 

lea 

pll1+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),do 

sub. 1 

#80,dO 

move 

d0,4(al) 

swap 

dO 

move 

dO,(al) 

lea 

pl22+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),d0 

sub. 1 

#80,do 

move 

dO,4(al) 

swap 

dO 

move 

dO,(al) 
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lea 

pl33+2(pc),al 

move 

(al),d0 

swap 

dO 

move 

4(al),d0 

sub. 1 

#80,dO 

move 

dO,4(al) 

swap 

dO 

move 

dO,(al) 

cmp 

#346,count2 

bne.s 

noscroll2 

clr 

count2 

move.b 
rts 

#$01,kennbyte2 


Horizontales Scrolling 

Um ein horizontales Scrolling zu programmieren, bedarf es 
sorgfältiger Überlegung. Wenn wir dazu die Startadresse der 
Bitplane verschieben wollen, so ist dies leider nur um ein 
Word, das sind 16 Pixel, möglich. Das bedeutet, daß unser 
Scrolling fürchterlich "ruckeln" würde. 

Um dem Abhilfe zu schaffen und unsere Planes sanft und weich 
zu bewegen, greifen wir auf das, schon bekannte, Register 
BPLC0N1 zurück. Wir wissen bereits, daß mit diesem Register 
eine Verschiebung von 0 bis 15 Pixel zulässig ist. Damit wä¬ 
re die Verwendung schon erklärt: Zuerst werden die Planes 
solange mit Hilfe von BPLC0N1 verschoben, bis sie 15 Pixel 
erreicht haben. Anschließend wird ein Word zur Plane-Adresse 
addiert und BPLC0N1 wieder auf 0 gesetzt. 
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3.2.5. DIE FERTIGE BILDSCHIRMDARSTELLUNG 


Nachdem wir auf den vorangegangenen Seiten die Funktion des 
Coppers und die Darstellung von Playfields genauer bespro¬ 
chen haben, wenden wir uns nun der Erstellung der fertigen 
Copperliste und damit der Bildschirmdarstellung unseres 
Spiels zu. 

Unser Spiel soll, wie schon erwähnt, zwei Ebenen haben, auf 
denen sich der Spieler bewegen kann. Dazu verwenden wir na¬ 
türlich den Dual-Playfield Modus. Beide Ebenen sollen hori¬ 
zontal scrollen und zwar in verschiedenen Geschwindigkeiten. 
Die größere Ebene soll Ausmaße von 320 * 600, die kleinere 
320 * 400 haben. Der sichtbare Bereich für den gesamten 
Schirm soll auch in den PAL-Bereich hineinreichen. Das 
Scrolling selbst wird hingegen nur im NTSC-Bereich stattfin¬ 
den. Dazu definieren wir erst einmal die Fenstergröße: 

copperl: 

dc.W $008e,$3081 ;DIWSTRT 
de.w $0090,$35cl ;DIWST0P 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 

Darüberhinaus können wir die folgenden Register auf 0 set¬ 
zen, da wir weder eine Verschiebung noch Modulo benötigen. 

dc.w $0102,$0000 ;BPLCON1 
dc.w $0108,$0000 ;BPL1M0D 
dc.w $010a,$0000 ;BPL2M0D 

Im nächsten Move werden die Prioritäten, die Bitplanes be¬ 
treffend, festgelegt. Deren Bedeutung wird genauer im Kapi¬ 
tel Sprites besprochen, daher ist vorerst folgender Wert an¬ 
zunehmen : 

dc.w $0104,$0064 ;BPLC0N2 

Im nun folgenden Register wird der Dual-Playfield Modus und 
die Anzahl der verwendeten Bitplanes angegeben. Da unsere 
beiden Spielflächen aus jeweils drei Bitplanes bestehen, 
müssen wir alle sechs verfügbaren Bitplanes aktivieren. 

dc.w $0100,$6600 ;BPLCONO 
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Die nächsten 12 Einträge sind die Zeiger auf die Adressen, 
der im Speicher liegenden Bitplanes. Zeiger eins ($00e0) 
weist auf das High-Word von Bitplane 1 des ersten Play- 
fields, Zeiger zwei auf das Low-Word. Hingegen wird im 
BPL2PT-Register die Adresse von Bitplane 1 des zweiten Play- 
fields angegeben. Das heißt, es zeigt immer ein Zeiger ab¬ 
wechselnd auf je eine Plane eines Playfields. Vorerst sind 
die Adressen auf 0 gesetzt. Die richtige Adresse wird jedoch 
am Anfang unseres Programms eingetragen, dazu wurden auch 
die Label definiert (pll,...). 

pll: de.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 
plll: dc.w $00e4,$0000 ;BPL2PTH 
dc.W $00e6,$0000 ;BPL2PTL 
pl2: dc.w $00e8,$0000 ;BPL3PTH 

dc.w $00ea,$0000 ;BPL3PTL 
pl22: dc.w $00ec,$0000 ;BPL4PTH 
dc.w $00ee,$0000 ;BPL4PTL 
pl3: dc.w $00f0,$0000 ;BPL5PTH 

dc.w $00f2,$0000 ;BPL5PTL 
pl33: dc.w $00f4,$0000 ;BPL6PTH 
dc.w $00f6,$0000 ;BPL6PTL 

Als nächstes folgen die Adressen der Sprites. Genaueres über 
dieses Thema entnehmen Sie bitte dem nächsten Kapitel. 

pl: dc.w $0120,$0000 ;SPR0PTH 

dc.w $0122,$0000 ;SPR0PTL 
dc.w $0124,$0000 ;SPR1PTH 
dc.w $0126,$0000 ;SPR1PTL 
p2: dc.w $0128,$0000 ;SPR2PTH 

dc.w $012a,$0000 ;SPR2PTL 
dc.w $012c,$0000 ;SPR3PTH 
dc.w $012e,$0000 ;SPR3PTL 
p3: dc.w $0130,$0000 ;SPR4PTH 

dc.w $0132,$0000 ;SPR4PTL 
dc.w $0134,$0000 ;SPR5PTH 
dc.w $0136,$0000 ;SPR5PTL 
p4: dc.w $0138,$0000 ;SPR6PTH 

dc.w $013a,$0000 ;SPR6PTL 
dc.w $013c,$0000 ;SPR7PTH 
dc.w $013e,$0000 ;SPR7PTL 
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Die nächsten Register sind die schon bekannten Farbregister, 
in denen die Farben für unsere Playfields, aber auch die 
Sprites vorhanden sind. 

dc.w $0180,$0000 /Farben für kleines 

dc.w $0182,$00ff /Playfield 

dc.w $0184,$00de 

dc.w $0186,$00cc 

dc.w $0188,$00ab 

dc.w $018a,$009a 

dc.w $018c,$0078 

dc.w $018e,$0067 

dc.w $0190,$0000 /Farben für großes 

dc.w $0192,$0e84 /Playfield 

dc.w $0194,$0d73 

dc.w $0196,$0b62 

dc.w $0198,$0a51 

dc.w $019a, $0941 

dc.w $019c,$0730 

dc.w $019e,$0620 

sprr0:dc.w $01a0,$0000 /Farben für Joystick- 

dc.w $01a2,$0f0c /Sprite 

dc.w $01a4,$0c0a 
dc.w $01a6,$0a08 

sprrlrdc.w $01a8,$0000 /Farben für Feind- 

dc.w $01aa,$0f00 /Sprite 

dc.w $01ac,$0b00 
dc.w $01ae,$0800 

sprr2:dc.w $01b0,$0000 /Farben für Symbol- 

dc.w $01b2 / $00f0 /Sprite 1 

dc.w $01b4,$00a0 
dc.w $01b6,$0060 

sprr3:dc.w $01b8,$0000 /Farben für Symbol- 

dc.w $01ba,$0ff0 /Sprite 2 

dc.w $01bc,$0aa0 
dc.w $01be,$0660 

Um die schon im Kapitel Copper besprochene 3D-Rolle einzu¬ 
bauen, müssen wir dafür einen Platz von 120 Words in der 
Copperliste definieren. Dies geschieht durch folgenden Be¬ 
fehl: 


eins: blk.w 120 /Platz für 3D-Rolle 
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Nun hätten wir den Bildschirmaufbau im oberen Bereich fer¬ 
tiggestellt , da wir aber auch den PAL-Bereich nützen wollen, 
werden wir dort eine Anzeigetafel plazieren. Dafür werden 
wir eine 32-farbige (=5 Planes) Anzeigetafel entwerfen und 
einbauen. Wie können wir aber erneut 5 Planes unterbringen, 
wenn wir schon alle sechs belegt haben? Ganz einfach, da wir 
mit den Copper Wait-Befehlen eine beliebige Strahlenpositi¬ 
on abfangen können, werden wir warten, bis der Rasterstrahl 
die letzte Zeile im NTSC-Bereich erreicht hat und anschlie¬ 
ßend dem Copper erneut ein Playfield zuweisen, das aus 5 
Planes besteht und natürlich auch eigene, vom vorhergehenden 
Playfield unabhänige, Farben besitzen darf. Diese Technik 
nennt man Bildschirm-Splitting. Dadurch lassen sich prak¬ 
tisch mehrere Ebenen verwenden, obwohl es eigentlich gar 
nicht soviele gibt. 

dc.w $ff01,$fffe ;Wait 

Hat der Rasterstrahl die vorgegebene Zeile erreicht, muß dem 
Copper wieder mitgeteilt werden, wieviele Planes man verwen¬ 
den möchte. Da wir nur 5 Planes, aber kein Dual-Playfield, 
verwenden wollen, werden wir folgenden Wert eintragen: 

dc.w $0100,$5200 ;BPLCON0 


Ebenso müssen wir die Adressen der Planes im Speicher fest¬ 
legen. Noch ist eine Null eingetragen, da die endgültige 
Adresse zu Beginn des Programms festgelegt wird. 


pllll:dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 


$00e0,$0000 
$00e2,$0000 
$00e4,$0000 
$00e6,$0000 
$00e8,$0000 
$00ea,$0000 
$00ec,$0000 
$00ee,$0000 
$00f0,$0000 
$ 00 f 2,$0000 


;BPL1PTH 
;BPL1PTL 
;BPL2PTH 
;BPL2PTL 
;BPL3PTH 
;BPL3PTL 
;BPL4PTH 
;BPL4PTL 
;BPL5PTH 
;BPL5PTL 


Jetzt kommen noch die neuen Farben für unser Playfield. Au¬ 
ßerdem wurden einige Register durch Labels (col, sieger,...) 
gekennzeichnet, da wir diese Register vom Programm aus ver¬ 
ändern wollen, um Effekte zu erzielen (z.B.: Eine Schrift 
blinken lassen). 
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col: dc.w $0180,$0000 

dc.w $0182,$00f0 
dc.w $0184,$0fff 
dc.w $0186,$0fff 
siegende.w $0188,$0888 


dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
aal: dc.w 
aa2: dc.w 
aa3: dc.w 

dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 


$018a,$0256 
$018c,$0888 
$018e,$0fff 
$0190,$0267 
$0192,$0278 
$0194,$038a 
$0196,$03ab 
$0198,$0d33 
$019a,$0b33 
$019c,$0a22 
$019e,$0922 
$01a0,$0fff 
$01a2,$0fff 
$01a4,$0fff 
$01a6,$0fff 
$01a8,$0fff 
$01aa,$0f77 
$01ac,$0c55 
$01ae,$0733 
$01b0,$0f77 
$01b2,$0e66 
$01b4,$0d66 
$01b6,$0c55 
$01b8,$0a55 
$01ba,$0944 
$01bc,$0844 
$01be,$0733 


/Farben für die untere 
/Anzeigetafel 


Abschließend fehlt nur noch die Endekennung, die dem Copper 
das Ende der Liste signalisiert. 

dc.w $ffff,$fffe /Endekennung 

Soweit zum Aufbau unserer Spiel-Copperliste. Weitere Details 
über Sprites folgen im nächsten Kapitel. 
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3.3. DIE SPRITES 


Wie schon erwähnt, ist der Amiga nicht nur in der Lage sechs 
Bitplanes, mit maximal zwei Playfields, zu kombinieren, son¬ 
dern darüberhinaus bis zu acht verschiedene Sprites darzu¬ 
stellen . 

Ein Sprite darf eine Breite von maximal 16 Pixel haben. Die 
Länge ist beliebig und nur durch die Bildschirmgröße be¬ 
grenzt. Da ein Sprite aus zwei Planes (ähnlich wie bei Play¬ 
fields) besteht, sind nur drei verschiedene Farben möglich. 

Es können auch zwei Sprites miteinander verknüpft werden, um 
ein 15-farbiges Sprite zu schaffen. Aber darauf gehen wir 
etwas später noch genauer ein. 
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3.3.1. AUFBAU UND DARSTELLUNG VON SPRITES 


Die Programmierung von Sprites läßt sich auf dem Amiga rela¬ 
tiv einfach und komfortabel realisieren. Man erstellt eine 
Datenliste, welche die Grafik des Objektes enthält, legt 
diese an eine beliebige Adresse im Speicher und teilt dem 
Amiga mit, wo er diese Daten findet. Abschließend muß natür¬ 
lich noch das Sprite-DMA eingeschaltet werden und schon sind 
unsere Objekte sichtbar. 

Der einzige Nachteil ist, daß Sprites eine maximale Breite 
von 16 Pixel und nur drei Farben haben können. Sehen wir uns 
zunächst die Sprite-Register an, die zur Darstellung benö¬ 
tigt werden: 


SPROPTH ($dffl20) 

Dies ist der Zeiger auf das High-Word der im Speicher lie¬ 
genden Daten von Sprite 0. 

SPROPTL ($dff122) 

In diesem Register wird das Low-Word des Zeigers auf die 
Sprite O-Daten gespeichert. 


SPRIPTx - SPR7PTX ($dff124 - $dffl3e) 

Für dieses Register gilt dasselbe, wie für die SPROPTx- 
Register. 


Wir werden diese Zeiger in unserer Copperliste aufnehmen und 
ähnlich wie bei den Zeigern auf die Playfields, die Zuwei¬ 
sung des richtigen Speichers am Anfang des Programms vorneh¬ 
men. 


move.l #sprite,dO 
move d0,spl+6 
swap dO 
move d0,spl+2 


;Sprite-Adresse in dO 
;Low word eintragen 

;High word eintragen 
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indem wir High- und Low-Word getrennt in die Copperliste 
eintragen. Unter dem Label "sprite" sind die Grafik-Daten 
definiert, die wir uns als nächstes ansehen wollen: Um ein 
Sprite zu entwerfen, überlegt man sich am besten zuerst 

o die genaue Größe 

o die Form 

o und die Anzahl der verwendeten Farben 

Anschließend kann man beginnen die ungefähre Form des Objek¬ 
tes auf Papier zu bringen. Nehmen wir als Beispiel die Form 
eines neuen Mauszeigers an. Zeichnen Sie einen Raster, mit 
maximal 16 Punkten Breite und beliebiger Länge und anschlie¬ 
ßend die gewünschte Form ein, ohne Rücksicht auf die Farben 
zu nehmen: 
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Bild 6: SPRITE-Aufbau 
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Würden wir dieses Bild nun in binärer Schreibweise als Daten 
übernehmen, so wäre unser neuer Mauszeiger leider nur ein¬ 
farbig. Weil wir aber bis zu drei Farben zur Verfügung ha¬ 
ben, können wir unsere Grafik colorieren. 

Beispiel: 
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Bild 7: SPRITE-Farben 
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Doch wie rechnet man diese Grafik in eine, für den Computer 
verständliche, Form um? Ganz einfach, man kann die in der 
Grafik eingesetzten Farben wie zwei verschiedene Bitplanes 
betrachten. Ist ein Bit auf einer Plane gesetzt, so ist auch 
ein Punkt in der Farbe 1 sichtbar. Will man jedoch Farbe 2, 
so ist das gewünschte Bit auf der zweiten Plane zu setzen. 
Ist jedoch Farbe 3 gewünscht, so muß man die Bits beider 
Planes setzen. Ist weder ein Bit der ersten noch der zweiten 
Plane gesetzt, so ist die Farbe transparent und alle dahin¬ 
terliegenden Elemente, ob das nun Playfields oder andere 
Sprites sind, werden sichtbar. Im Programm schreiben wir die 
beiden Bitplanes, mit der Dateninformation für unser Sprite, 
getrennt in binärer Form auf. 


de .w %0000001110000000,%0000000010000000 
dc.W %0000001010000000,%0000000110000000 
de.W %0000001010000000,%0000000110000000 
dc.W %0000001010000000,%0000000110000000 
dc.W %0011111011111000,%0000000010000000 
dc.W %0010000000001000,%0001110001111000 
dc.W %0011111011111000,%0001111011111000 
dc.W %0000001010000000,%0000000110000000 
dc.W %0000001010000000,%0000000110000000 
dc.W %0000001010000000,%0000000110000000 
dc.W %0000001110000000,%0000000110000000 

Viel einfacher ist es jedoch, wenn man das Sprite nicht so 
umständlich und langwierig auf dem Papier entwirft, sondern 
dazu ein Malprogramm, wie zum Beispiel DPAINT III verwendet. 
Nicht nur, daß dieses Programm viel Komfort beim Malen bie¬ 
tet, hat man auch sofort das Ergebnis vor Augen und kann Än¬ 
derungen leichter und vorallem viel schneller vornehmen als 
auf dem Papier. Hat man sein Sprite gezeichnet, so kann man 
es in dieser Form nicht verwenden, sondern es muß ebenfalls 
in das RAW-Format gebracht werden. Dazu speichern Sie bitte 
Ihr Sprite als Brush ab und verwenden ein beliebiges Konver- 
tier-Programm. Dadurch sparen Sie nicht nur viel Arbeit, 
sondern auch viel Zeit. 
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Eine Einschränkung in der Farbgebung gibt es leider noch. Es 
stehen nämlich keine eigenen Farb-Register für Sprites zur 
Verfügung, sondern es werden die Register COLOR16 bis CO- 
LOR31 verwendet. Außerdem werden die Sprites paarweise zu¬ 
sammengefaßt. Jeweils zwei Sprites teilen sich vier Farb- 
Register. Dadurch ergibt sich folgende Aufteilung: 


COLOR16 

COLOR17 

C0L0R18 

COLOR19 


(Farbe durchsichtig) 
(Farbe beliebig) 
(Farbe beliebig) 
(Farbe beliebig) 


gilt für Sprite 0 & 1. 


COLOR20 (Farbe durchsichtig) 

COLOR21 (Farbe beliebig) 

COLOR22 (Farbe beliebig) 

COLOR23 (Farbe beliebig) 


gilt für Sprite 2 & 3. 


COLOR24 

(Farbe 

durchsichtig) 

COLOR25 

(Farbe 

beliebig) 

COLOR26 

(Farbe 

beliebig) 

COLOR27 

(Farbe 

beliebig) 

COLOR28 

(Farbe 

durchsichtig) 

COLOR29 

(Farbe 

beliebig) 

COLOR30 

(Farbe 

beliebig) 

COLOR31 

(Farbe 

beliebig) 


gilt für Sprite 4 & 5. 


gilt für Sprite 6 & 7. 


Als nächstes sehen wir uns die Positionierung auf dem Bild¬ 
schirm an. Diese Information wird dem Coputer gleichzeitig 
mit der Grafik-Datenliste übermittelt. Das erste Long-Word 
der Datenliste enthält nicht nur die X- und Y-Position des 
Sprites, sondern auch noch die Länge. Dieses Long-Word wird 
in zwei Befehlswörter eingeteilt. Das erste Byte des ersten 
Kontrollwortes enthält die horizontale Startposition 
(HSTART), das zweite die vertikale Startposition (VSTART). 
Horizontal ist eine X-Position ein Pixel in Lo-res- 
Auflösung, vertikal hingegen eine Rasterzeile. Die Positio¬ 
nierung von Sprites ist unabhänig von der Auflösung der 
Playfields. Die X- und Y-Startposition bezieht sich immer 
auf die linke obere Ecke unseres Sprites, auch wenn diese 
als durchsichtig deklariert wurde. Dies ist bei der Program¬ 
mierung zu berücksichtigen. 
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Im ersten Byte des zweiten Kontrollwortes wird die vertikale 
Endposition (VSTOP) festgelegt. Diese entspricht der verti¬ 
kalen Startposition plus der Anzahl an Zeilen des Sprites. 
Auf eine horizontale Endposition wurde verzichtet, da jedes 
Sprite automatisch 16 Punkte breit ist. Falls dies, wie in 
unserem Beispiel, nicht der Fall ist, so sind einfach die 
fehlenden Pixel auf null zu setzen. 

Will man ein Sprite nicht sichtbar haben, so muß man ledig¬ 
lich die ersten beiden Kontrollworte auf null setzen. 

dc.w $0000,$0000 

Dadurch wurde unser Sprite an die Bildschirm-Position X=0, 
Y=0 gesetzt und ist 0 Zeilen lang. Daher ist es unsichtbar. 

Abschließend müssen wir, wie anfangs schon erwähnt, das DMA 
einschalten, damit unsere Sprites überhaupt dargestellt wer¬ 
den. Dies geschieht mit folgender MOVE-Anweisung: 

move.w #$8020,$dff096 

Somit werden alle 8 Sprites aktiviert und, falls sie nicht 
auf Null gesetzt wurden, auf dem Bildschirm angezeigt. Die 
genaue Belegung des DMACON-Register entnehmen Sie bitte dem 
Kapitel Sound-Programmierung. 

Nun folgt das fertige Listing, das ein Sprite auf dem Bild¬ 
schirm darstellt. 
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/ 

; Darstellung eines Sprites 


s: 

move.w #$4000,$dff09a /Interrupts sperren; 

/Betriebssystem ausschalten 
move #$8020,$dff096 /Sprites einschalten 

move.l #copperl,$dff084 /Copperliste aktivieren 

move.l #pic,d0 /Bild-Adresse in dO 

move d0,planel+6 /Low word eintragen 

swap dO 

move d0,planel+2 /High word eintragen 

move.l #sprite,d0 /Sprite-Adresse in dO 

move dO,spl+6 /Low word eintragen 

swap dO 

move d0,spl+2 /High word eintragen 

7 

loop: move.l $dff004,d0 /Warten auf Rasterstrahl 

and.l #$fff00,d0 

cmp.l #$00003000,dO 

bne.s loop 

btst #6,$bfe001 /Maustaste gedrückt ? 

bne.s loop /Ja ? 

/ 

ende: move #$c000,$dff09a /Interrupts erlauben 

e: rts ;Programmende 

} 

copperl: dc.w $008e,$3081 ;DIWSTRT 
dc.w $0090,$35cl ;DIWSTOP 
dc.W $0104,$0000 ;BPLCON2 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094, $00d0 ;DDFSTOP 
dc.w $0102,$0000 ;BPLCON1 
dc.w $0108,$0000 ;BPL1MOD 
dc.w $010a,$0000 ;BPL2MOD 
dc.w $0100,$1200 ;BPLCON0 
planel: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 
dc.w $0180,$0000 ;COLOROO 
dc.w $0182,$0fff ;COLOR01 
dc.w $01a2,$0f00 ;COLOR17 
dc.w $01a4,$0a00 ;COLOR18 
dc.w $01a6,$0600 ;COLOR19 
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spl: dc.w $0120,$0000 ;SPROPTH 

dc.w $0122,$0000 ;SPR0PTL 
dc.W $0124,$0000 ;SPR1PTH 
dc.w $0126,$0000 ;SPR1PTL 
sp2: dc.w $0128,$0000 ;SPR2PTH 

dc.w $012a,$0000 ;SPR2PTL 
dc.w $012c,$0000 ;SPR3PTH 
dc.w $012e,$0000 ;SPR3PTL 
sp3: dc.w $0130,$0000 ;SPR4PTH 

dc.w $0132,$0000 ;SPR4PTL 
dc.w $0134,$0000 ;SPR5PTH 
dc.w $0136,$0000 ;SPR5PTL 
sp4: dc.w $0138,$0000 ;SPR6PTH 

dc.w $013a,$0000 ;SPR6PTL 
dc.w $013c,$0000 ;SPR7PTH 
dc.w $013e,$0000 ;SPR7PTL 
dc.w $ffff,$fffe ;Warten auf unmögliche 
/Position 

} 

sprite: dc.w $a08c,$b000 /Buffer für SpriteO 

dc.w $0001,$0000 
dc.w $0007,$0001 
dc.w $001A,$0006 
dc.w $0062,$001E 
dc.w $0184,$007C 
dc.w $0604,$01FC 
dc.w $0808,$07F8 
dc.w $0808,$07F8 
dc.w $1010,$0FF0 
dc.w $1010,$0FF0 
dc.w $2060,$1FE0 
dc.w $2180,$1F80 
dc.w $4600,$3E00 
dc.w $5800,$3800 
dc.w $E000,$6000 
dc.w $8000,$0000 

pic: blk.b 10240 /Buffer für Bild 
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3.3.2. BEWEGUNG VON SPRITES 


Wie wir bereits wissen, wird die Position eines Sprites mit 
Hilfe der ersten beiden Kontrollworte bestimmt. Will man ein 
Sprite nun bewegen, so braucht man nur die X- bzw. Y- 
Position im betreffenden Kontrollwort verändern. Wichtig da¬ 
bei ist, daß man, wie bei allen anderen Operationen auch, 
auf das richtige Timing achtet, damit die Sprite-Position 
nicht verändert wird, wenn der Amiga gerade darauf zugreift. 
Sehen wir uns das fertige Programm an: 


Bewegung eines Sprites 


s: 


loop: 


ende: 

e: 


move.w 

#$4000,$dff09a 

;Interrupts sperren; 
/Betriebssystem ausschal 
ten 

move 

#$8020,$dff096 

/Sprites einschalten 

move.1 

#copperl,$dff084 

/Copperliste aktivieren 

move.1 

#pic,d0 

/Bild-Adresse in dO 

move 

dO,planel+6 

/Low word eintragen 

swap 

dO 


move 

dO,planel+2 

/High word eintragen 

move.1 

#sprite,d0 

/Sprite-Adresse in dO 

move 

d0,spl+6 

/Low word eintragen 

swap 

dO 


move 

d0,spl+2 

/High word eintragen 

move.1 

$dff004,d0 

/Warten auf Rasterstrahl 

and.l 

#$fff00,d0 


cmp. 1 

#$00003000,dO 


bne.s 

loop 


bsr .s 

movesprite 

/Sprite bewegen 

btst 

#6,$bfe001 

/Maustaste gedrückt ? 

bne.s 

loop 

/Ja ? 

move 

#$c000,$dff09a 

/Interrupts erlauben 

rts 


;Programmende 
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movesprite: 

add.b #1,count ;Sprite bewegen 

cmp.b #3,count 

bne.s nomove 

clr.b count 

cmp.b #l,richtung 

beq.s links 

rechts: add.b #1,sprite+1 

cmp.b #$d0,sprite+1 
bne.s nomove 
move.b #$1,richtung 
nomove: rts 

links: sub.b #1,sprite+1 

cmp.b #70,sprite+1 
bne.s nomove 
clr.b richtung 
rts 
7 

richtung: dc.b 0 
count: dc.b 0 

7 

copperl: dc.w $008e,$3081 ;DIWSTRT 

dc.w $0090,$35cl ;DIWSTOP 

dc.w $0104,$0000 ;BPLCON2 

dc.w $0092,$0038 ;DDFSTRT 

dc.w $0094,$00d0 ;DDFSTOP 

dc.w $0102,$0000 ;BPLC0N1 

dc.w $0108,$0000 ;BPL1M0D 

dc.w $010a,$0000 ;BPL2MOD 

dc.w $0100,$1200 ;BPLCON0 

planel: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 

dc.w $0180,$0000 ;COLOROO 

dc.w $0182,$0fff ;COLORO1 

dc.w $01a2,$0f00 ;COLOR17 

dc.w $01a4,$0a00 ;COLOR18 

dc.w $01a6,$0600 ;COLOR19 

spl: dc.w $0120,$0000 ;SPR0PTH 

dc.w $0122,$0000 ;SPR0PTL 

dc.w $0124,$0000 ;SPR1PTH 

dc.w $0126,$0000 ;SPR1PTL 

sp2: dc.w $0128,$0000 ;SPR2PTH 

dc.w $012a,$0000 ;SPR2PTL 

dc.w $012c,$0000 ;SPR3PTH 

dc.w $012e,$0000 ;SPR3PTL 


106 



KAPITEL 3 


DIE PROGRAMMIERUNG 


sp3: 


sp4: 


sprite: 


pic: 


dc.w 

dc.w 

dc.w 

dc.w 

dc.w 

dc.w 

dc.w 

dc.w 

dc.w 


$0130,$0000 
$0132, $0000 
$0134,$0000 
$0136,$0000 
$0138,$0000 
$013a,$0000 
$013c,$0000 
$013e,$0000 
$ffff,$fffe 


SPR4PTH 

SPR4PTL 

SPR5PTH 

SPR5PTL 

SPR6PTH 

SPR6PTL 

SPR7PTH 

SPR7PTL 

Warten auf unmögliche 
Position 


dc.w $a08c,$b000 
dc.w $0001,$0000 
dc.w $0007,$0001 
dc.w $001A,$0006 
dc.w $0062,$001E 
dc.w $0184,$007C 
dc.w $0604,$01FC 
dc.w $0808,$07F8 
dc.w $0808,$07F8 
dc.w $1010,$0FF0 
dc.w $1010,$0FF0 
dc.w $2060,$1FE0 
dc.w $2180,$1F80 
dc.w $4600,$3E00 
dc.w $5800,$3800 
dc.w $E000,$6000 
dc.w $8000,$0000 


;Buffer für SpriteO 


blk.b 10240 ;Buffer für Bild 


Wichtig ist, daß man die Koordinaten der Sprites in Überein¬ 
stimmung mit der Fenstergröße bringt, die in DIWSTRT und 
DIWSTOP festgelegt wird, da die Sprites nur in diesem Be¬ 
reich normal dargestellt werden. Außerhalb dieser Begrenzung 
sind sie nicht mehr sichtbar, da die Daten dort nicht darge¬ 
stellt werden können. 
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In dem Label "count" wird die Geschwindigkeit der Bewegung 
definiert. Vergrößern oder verkleinern Sie diesen Zähler, so 
werden Sie sehen, mit welchen Geschwindigkeiten sich unser 
Sprite bewegt. Das Byte "richtung" gibt an, ob sich das 
Sprite nach links oder nach rechts bewegt, jenachdem ob 0 
oder 1 in der Speicherstelle steht. 

In unserem Spiel werden wir die Sprites sowohl um einen X- 
als auch um einen Y-Wert bewegen. Dies bedeutet, daß sie 
sich mit unterschiedlichen Geschwindigkeiten in verschiedene 
Richtungen bewegen. Als Beispiel, stellvertretend für alle 
Bewegungen, wird die Sequenz des roten Punktes ausgewählt. 

Zuerst holen wir aus den Speicherplätzen "IS" und "lö” die 
abgelegten Werte und übergeben sie den Datenregistern d4 und 
d5. 


moveenemy: move.b 15,d4 ;Rotes Sprite bewegen 
move.b I6,d5 

Anschließend wird der Inhalt von d4 zu ” 13 " addiert und der 
horizontale Zähler "11" um 1 verringert. Ist das Ergebnis 
ungleich null, so wird zu "labell" verzweigt, wo das Ergeb¬ 
nis in das Kontrollwort eingetragen wird. Wenn Null erreicht 
ist, wird der Zähler wieder auf 151 gesetzt. Diese Schritte 
wiederholen sich für die vertikale Position. 


labell: 


label2: 


add.b 

d4,13 

subq.b 

#1,11 

bne.s 

labell 

move.b 

#151,11 

eor .b 

#$fe,d4 

move.b 

I3,sprite3+1 

add.b 

d5,14 

subq.b 

#1,12 

bne.s 

label2 

move.b 

#194,12 

eor .b 

#$fe,d5 

move.b 

I4,sprite3 

move.b 

14,d6 
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Um die VSTOP-Position zu bekommen, wird einfach die Länge 
des Sprites zur VSTART-Position addiert und in das zweite 
Kontrollwort eingetragen. 

add.b #$10,d6 
move.b d6,sprite3+2 

Abschließend werden die Register d4 und d5 wieder gesichert 
und die Routine mit rts beendet. 

move.b d4,l5 
move.b d5,l6 
rts 


Der Amiga bietet uns auch die Möglichkeit einen Sprite-Kanal 
öfter als einmal zu verwenden, um mehrere Sprites darzustel¬ 
len. Wie wir bereits wissen, kann ein Sprite beliebig lang 
sein und ist nur durch die Bildschirmgröße begrenzt. Sobald 
ein Sprite kürzer ist, können wir ein anderes darunter set¬ 
zen, indem wir nach der letzten Spritedaten-Zeile wieder 
zwei neue Kontrollworte einfügen, die die Länge des nächsten 
Sprites bestimmen. 


sprite: 


dc.w $a07c,$b000 ;Buffer für SpriteO 

de.w $0001,$0000 

dc.w $0007,$0001 

dc.w $001A,$0006 

dc.w $0062,$001E 

dc.w $0184,$007C 

dc.w $0604,$01FC 

dc.w $0808,$07F8 

dc.w $0808,$07F8 

dc.w $1010,$0FF0 

dc.w $1010,$0FF0 

dc.w $2060,$1FE0 

dc.w $2180,$1F80 

dc.w $4600,$3E00 

dc.w $5800,$3800 

dc.w $E000,$6000 

dc.w $8000,$0000 
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dc.W $c09c,$d000 
de.w $0001,$0000 
dc.w $0007,$0001 
dc.W $001A, $0006 
dc.w $0062,$001E 
dc.w $0184,$007C 
dc.w $0604,$01FC 
dc.w $0808,$07F8 
dc.w $0808,$07F8 
dc.w $1010,$0FF0 
dc.w $1010,$0FF0 
dc.w $2060,$1FE0 
dc.w $2180,$1F80 
dc.w $4600,$3E00 
dc.w $5800,$3800 
dc.w $E000,$6000 
dc.w $8000,$0000 


;Hier liegen die Sprite- 
;Daten, die ebenfalls 
;über denselben Kanal 
;dargestellt werden. 


Wie aus dem Listing ersichtlich ist, wird zuerst das erste 
Sprite bestimmt und nach der letzten Zeile folgen wieder 
zwei Kontrollworte, die das nächste Sprite festlegen. So 
kann man beliebig viele Sprites erzeugen. Diese Sprites kön¬ 
nen unterschiedliche X-Werte haben, sich jedoch in der ver¬ 
tikalen Richtung nicht überlappen. 

Mit einem kleinen Trick ist es möglich den nachfolgenden 
Sprites jeweils andere Farben zuzuweisen. 

Da sich die vertikalen Positionen zwischen den Sprites nicht 
überschneiden können, braucht man lediglich in der Copperli¬ 
ste einen Wait-Befehl einfügen und in der Zeile, welche die 
zwei Sprites trennt, neue Farben in die Sprite-Color- 
Register schreiben. Somit können wir viele verschiedenfarbi¬ 
ge Sprites darstellen. 


110 



KAPITEL 3 


DIE PROGRAMMIERUNG 


3.3.3. SPRITE-ANIMATIONEN 


Wir haben nun gelernt, wie man Sprites darstellt, bewegt, ja 
sogar wie man mehrere Sprites über einen Kanal verwendet. 
Als nächstes wollen wir die Sprites für unser Spiel animie¬ 
ren. Das heißt wir werden nicht nur eine Bewegung zeichnen, 
sondern mehrere und werden diese hintereinander darstellen. 
Dadurch entsteht der Eindruck, als würde sich unser Objekt 
beispielsweise verformen. 

Wir wissen bereits, daß man, um ein Sprite zu bewegen, ein¬ 
fach die Koordinaten der Kontrollworte verändern muß. Um das 
Sprite selbst zu verändern, muß man lediglich die Sprite- 
Grafik-Daten austauschen. 

Zuerst definieren wir ein Byte mit dem Namen "animcount", in 
welchem angegeben wird, wie oft unsere Sprites umgeschalten 
werden sollen. Es wird alle zehnmal eine andere Animations¬ 
phase angesprungen. Insgesamt haben wir drei verschiedene 
Phasen gezeichnet. Warum aber dann vier Umschalt-Phasen? 
Ganz einfach: Nehmen wir als Beispiel den roten Punkt, der 
vom Spieler nicht berührt werden darf. Dieser Punkt soll in 
unserer Animation drei Phasen bekommen: Groß, mittel und 
klein. Hat man jetzt von mittel auf klein geschaltet, so kä¬ 
me als nächste Phase wieder groß an die Reihe. Dies würde 
aber einen Phasen-Sprung verursachen. Daher aktivieren wir 
als vierte Animations-Phase wieder die mittlere Größe. Da¬ 
durch ergibt sich eine scheinbar kontinuierliche Bewegung. 


spriteanim: 


add.b 

#1,animcount ;Sprite Animationen 

cmp.b 

#10,animcount 

beq.s 

firstanim 

cmp.b 

#20,animcount 

beq.s 

secondanim 

cmp.b 

#30,animcount 

beq.s 

thirdanim 

cmp.b 

#40,animcount 

beq 

fourthanim 

rts 
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Nun folgen die einzelnen Unterroutinen, welche die einzelnen 
Phasen aus ihrer Speicherstelle holen und in den, am Bild¬ 
schirm sichtbaren Bereich kopieren. 


firstanim: 

lea 

sei,al 


lea 

seO,aO 


bsr 

ani 


lea 

sml,al 


lea 

smO,aO 


bsr 

ani 


lea 

snl,al 


lea 

snO,a0 


bsr 

ani 


lea 

sbl,al 


bra 

anim 

secondanim: 

lea 

se2,al 


lea 

seO,aO 


bsr 

ani 


lea 

sm2,al 


lea 

smO,aO 


bsr 

ani 


lea 

sn2,al 


lea 

snO,aO 


bsr .s 

ani 


lea 

sb2,al 


bra. s 

anim 

thirdanim: 

lea 

se3,al 


lea 

seO,aO 


bsr .s 

ani 


lea 

sm3,al 


lea 

smO,aO 


bsr .s 

ani 


lea 

sn3,al 


lea 

snO,a0 


bsr .s 

ani 


lea 

sb3,al 


bra. s 

anim 
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fourthanim: 


clr .b 

animcount 

add.b 

#1,annis 

lea 

se2,al 

lea 

seO,aO 

bsr.s 

ani 

lea 

sm2,al 

lea 

smO,aO 

bsr.s 

ani 

lea 

sn2,al 

lea 

snO,a0 

bsr.s 

ani 

lea 

sb2,al 


Damit das Listing nicht zu lange und kompliziert wird, wurde 
die, sich ständig wiederholende, Kopierschleife am Ende des 
Programms plaziert und jeweils mit bsr.s von oben angesprun¬ 
gen. 

anim: lea sbO,aO 

ani: move #15,d0 

copyanim: move.l (al)+,(aO)+ 

dbf dO,copyanim 

rts 


Es stellt sich abschließend die Frage wieviele Animations- 
Phasen nötig sind, um eine flüssige Bewegung zu realisieren. 
Wie Sie sehen, reichen die in unserem Fall verwendeten vier 
Phasen völlig aus. Aber je mehr Phasen Sie verwenden, desto 
schöner und sanfter bewegt sich Ihr Objekt - probieren Sie 
es! 
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3.3.4. ATTACHED SPRITES 


Leider haben Sprites nur vier Farben, wovon eine Farbe 
transparent ist. Daher bleiben nur drei effektive Farben 
über. Mit einem kleinen Trick lassen sich jedoch 15 Farben 
(plus transparent) erzeugen. Der Amiga bietet uns an, zwei 
Sprites zu einem zu verbinden. Dadurch erhalten wir quasi 
vier Bitplanes, welche wiederum 16 Farben darstellen können 
(2 hoch 4 = 16). 

Wir initialisieren alles wie gewöhnlich, nur daß wir zwei 
Sprites verwenden. Am besten zeichnen Sie Ihr Sprite mit ei¬ 
nem Malprogramm und konvertieren es gleich als 15-farbiges 
Sprite. Somit erhalten Sie jeweils zwei Planes mit dem rich¬ 
tigen Farbmuster. Diese ergeben, übereinander gelegt, das 15 
farbige Sprite. Diese müssen jedoch getrennt eingegeben wer¬ 
den, da sie auch so vom Amiga verwaltet werden und erst in¬ 
tern "übereinander gelegt" werden. 


sprite2: dc.w $a08c,$b080 ;Buffer für Spritei 


Dies geschieht durch Setzen des sogenannten Attached-Bit, 
welches im zweiten Befehls-Wort des zweiten Sprites gesetzt 
wird. Schauen Sie sich dazu das folgende Listing an: 
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/ 

; Darstellung von "attached" Sprites 


move.w #$4000,$dff09a /Interrupts sperren; 

/Betriebssystem ausschalten 
move #$8020,$dff096 /Sprites einschalten 

move.l #copperl,$dff084 /Copperliste aktivieren 

move.l #pic,d0 /Bild-Adresse in do 

move d0,planel+6 /Low word eintragen 

swap do 

move d0,planel+2 /High word eintragen 

move.l #spritel,d0 /Sprite-Adresse in do 

move d0,spl+6 /Low word eintragen 

swap dO 

move d0,spl+2 /High word eintragen 

move.l #sprite2,d0 ;Sprite-Adresse in do 

move do,spl+14 /Low word eintragen 

swap dO 

move do,spl+10 /High word eintragen 

/ 

loop: move.l $dff004,d0 /Warten auf Rasterstrahl 

and.l #$fff00,d0 

cmp.l #$00003000,d0 

bne.s loop 

btst #6,$bfe001 /Maustaste gedrückt ? 

bne.s loop /Ja ? 

r 

ende: move #$c000,$dff09a ;Interrupts erlauben 

e: rts ;Programmende 

f 

copperl: dc.w $008e,$3081 ;DIWSTRT 
de.w $0090,$35cl ;DIWSTOP 
dc.w $0104,$0000 ;BPLCON2 
dc.w $0092,$0038 ;DDFSTRT 
dc.w $0094,$00d0 ;DDFSTOP 
dc.w $0102,$0000 ;BPLCONl 
dc.w $0108,$0000 ;BPL1MOD 
dc.w $010a,$0000 ;BPL2MOD 
dc.w $0100,$1200 ;BPLCON0 
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planel: dc.w $00e0,$0000 ;BPL1PTH 

dc.w $00e2,$0000 ;BPL1PTL 
dc.w $0180,$0000 ;COLOROO 
dc.w $0182,$0fff ;COLOROl 
dc.w $01a2,$0f00 ;COLOR17 
dc.w $01a4,$0c00 ;COLOR18 
dc.w $01a6,$0a00 ;COLOR19 
dc.w $01a8,$0800 ;COLOR20 
dc.w $01aa,$0500 ;COLOR21 
dc.w $01ac,$00f0 ;COLOR22 
dc.w $01ae,$00c0 ;COLOR23 
dc.w $01b0,$00a0 ;COLOR24 
dc.w $01b2,$0080 ;COLOR25 
dc.w $01b4,$0050 ;COLOR26 
dc.w $01b6,$000f ;COLOR27 
dc.w $01b8,$000c ;COLOR28 
dc.w $01ba,$000a ;COLOR29 
dc.w $01bc,$0008 ;COLOR30 
dc.w $01be,$0005 ;COLOR31 
spl: dc.w $0120,$0000 ;SPROPTH 

dc.w $0122,$0000 ;SPR0PTL 
dc.w $0124,$0000 ;SPR1PTH 
dc.w $0126,$0000 ;SPR1PTL 
sp2: dc.w $0128,$0000 ;SPR2PTH 

dc.w $012a,$0000 ;SPR2PTL 
dc.w $012c,$0000 ;SPR3PTH 
dc.w $012e,$0000 ;SPR3PTL 
sp3: dc.w $0130,$0000 ;SPR4PTH 

dc.w $0132,$0000 ;SPR4PTL 
dc.w $0134,$0000 ;SPR5PTH 
dc.w $0136,$0000 ;SPR5PTL 
sp4: dc.w $0138,$0000 ;SPR6PTH 

dc.w $013a,$0000 ;SPR6PTL 
dc.w $013c,$0000 ;SPR7PTH 


dc.w $013e,$0000 ;SPR7PTL 
dc.w $ffff,$fffe ;Warten auf unmögliche 
;Position 
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/ 

spritel: dc.w $a08c,$b000 ;Buffer für SpriteO 
dc.w $FFFF,$0000 
dc.w $FFFF,$0000 
dc.w $0000,$FFFF 
dc.w $FFFF,$FFFF 
dc.w $0000,$0000 
dc.w $FFFF,$0000 
dc.w $0000,$FFFF 
dc.w $FFFF,$FFFF 
dc.w $0000,$0000 
dc.w $FFFF,$0000 
dc.w $0000,$FFFF 
dc.w $FFFF,$FFFF 
dc.w $0000,$0000 
dc.w $FFFF,$0000 
dc.w $0000,$FFFF 
dc.w $FFFF,$FFFF 

sprite2: dc.w $a08c,$b080 ;Buffer für Spritel 

dc.w $0000,$0000 ;attached-Bit gesetzt 

dc.w $0000,$0000 

dc.w $0000,$0000 

dc.w $0000,$0000 

dc.w $FFFF,$0000 

dc.w $FFFF,$0000 

dc.w $FFFF,$0000 

dc.w $FFFF,$0000 

dc.w $0000,$FFFF 

dc.w $0000,$FFFF 

dc.w $0000,$FFFF 

dc.w $0000,$FFFF 

dc.w $FFFF,$FFFF 

dc.w $FFFF,$FFFF 

dc.w $FFFF,$FFFF 

dc.w $FFFF,$FFFF 

pic: blk.b 10240 ;Buffer für Bild 
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3.3.5. PRIORITÄTEN 


Ein ganz wichtiger Punkt ist die Priorität der Grafik- 
Elemente untereinander. Unter Grafikelementen sind Play- 
fields und Sprites zu verstehen, deren Reihenfolge wir be¬ 
einflußen können. Wie wir bereits wissen, gibt es sechs Bit¬ 
planes, aus denen wir entweder ein oder maximal zwei Play- 
fields formen können. Haben wir den Dual-Playfield-Modus ak¬ 
tiviert, so ist normalerweise Playfield 1 vor Playfield 2 zu 
sehen. Setzt man aber das PF2PRI-Bit, so ist Playfield 2 im 
Vordergrund sichtbar. 

Wie funktioniert das aber bei den Sprites? Nun, Sprites be¬ 
sitzen eine vorgegebene Reihenfolge, die nicht verändert 
werden kann. Man kann sich Sprites wie einen Stapel vorstel¬ 
len, wobei das Sprite mit der niedrigsten Nummer als vorder¬ 
stes liegt. Das zu hinterst befindliche Sprite ist nur 
sichtbar, wenn die im Vordergrund liegenden transparente 
Punkte enthalten, falls nicht bleibt es im Fall einer Über¬ 
lappung verdeckt. Sehen wir uns das grafisch an: 




II 

;PR£ 

1, 


SP« 

sL 


» 



tr 

5PR2 \ 

SFRl| 

i 

SPR0 


Sprite 8 hat inner die 
höchste Priorität. 
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Die Priorität der Sprites ist nur in Bezug auf die/das Play- 
field/s wirksam. Man kann also nur Playfields zwischen Spri¬ 
tes positionieren, nicht aber die Reihenfolge der Sprites 
vertauschen. 

Noch eine weitere Einschränkung erfahren die Sprites, denn 
sie werden, wie wir schon bei der Farbgebung gehört haben, 
in Zweier-Gruppen zusammengefaßt: 

SPR 0&1, SPR 2&3, SPR 4&5, SPR 6&7 

Daher ergeben sich nur fünf Möglichkeiten, zur Plazierung 
eines Playfields. Sehen Sie dazu die Grafik: 



Bild 9: Playfield-Sprite Plazierung 
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Die Priorität wird im Register BPLC0N2 ($dffl04) festgelegt. 
Sehen wir uns die Bit-Belegung etwas genauer an: 


BPLC0N2 ($dff104) 

Bit Name Funktion 


15-7 


unbenutzt 


6 


5-3 


2-0 


PF2PRI Dieses Bit bestimmt, welches 

Playfield im Vordergrund 
liegt. Ist dieses Bit gesetzt, 
hat Playfield 2 die Priorität 
vor Playfield 1. 

PF2P2-PF2P0 Mit einer 3-Bit Kombination 

wird festgelegt, zwischen wel¬ 
chen Sprite-Paaren Playfield 2 
liegt. 


PF1P2-PF1P0 Wie PF2P2-PF2P0, nur gültig 
für Playfield 1. 


Sehen wir uns nun an, welche 3-Bit Kombination verwendet 
werden muß, wenn man die Lage der Playfields zwischen den 
Sprites bestimmen will. 


Bit-Wert Plazierung 


000 

PFX 

SP01 

SP2 3 

SP45 

SP67 

001 

SP01 

PFx 

SP23 

SP45 

SP67 

010 

SP01 

SP23 

PFx 

SP45 

SP67 

011 

SP01 

SP23 

SP45 

PFx 

SP67 

100 

SP01 

SP23 

SP45 

SP67 

PFX 


Für unser Spiel setzen wir, da wir ein Dual-Playfield ver¬ 
wenden, Playfield 2 vor Playfield 1 und geben beiden Play¬ 
fields die niedrigste Priorität, damit sämtliche Sprites da¬ 
vor sichtbar sind. Es sind folgende Bits zu setzen: 
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Bit 6 (PF2PRI) 

Bit 5 (PF2P2) -> %100 = SP01 SP23 SP45 SP67 PF2 
Bit 2 (PF1P2) -> %100 = SP01 SP23 SP45 SP67 PF1 


Das Ergebnis: %01100100 

Wir tragen diesen Wert hexadezimal in unsere Copperliste 
ein: 

de.w $0104,$0064 
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3.3.6. KOLLISIONEN 


Ein weiterer, wichtiger Punkt, bei der Programmierung eines 
Spiels, ist die Erkennung von Kollisionen zwischen den be¬ 
wegten Objekten. Dies können zum einen Kollisionen zwischen 
den Sprite-Paaren oder auch zwischen Playfields und Sprites 
sein. Des weiteren ist es möglich, im Dual-Playfield-Modus 
eine Kollision zwischen den beiden Playfields abzufragen. 
Dies ist dann besonders von Bedeutung, wenn man mit dem 
Blitter arbeitet und sogenannte Bobs verwendet. Man kann 
z.B. auf Playfield 1 den Hintergrund darstellen und auf 
Playfield 2 die Objekte "blitten". Will man eine Kollision 
zwischen einem Objekt (Bob) und dem Hintergrund abfragen, so 
muß man lediglich ein Bit testen. 

Eine Kollision zwischen Sprites ist dann gegeben, wenn ein 
sichtbarer (nicht transparenter) Punkt des einen Sprites ei¬ 
nen sichtbaren des anderen Sprites berührt (überlappt). Die¬ 
ses Überlappen wird im CLXDAT-Register registriert und das 
entsprechende Bit gesetzt. 


CLXDAT (SdffOOe) 


Bit 

Funktion 








15 

unbelegt 








14 

Sprite 

4 

(oder 

5) 

mit 

Sprite 

6 

(oder 

7) 

13 

Sprite 

2 

(oder 

3) 

mit 

Sprite 

6 

(oder 

7) 

12 

Sprite 

2 

(oder 

3) 

mit 

Sprite 

4 

(oder 

5) 

11 

Sprite 

0 

(oder 

1) 

mit 

Sprite 

6 

(oder 

7) 

10 

Sprite 

0 

(oder 

1) 

mit 

Sprite 

4 

(oder 

5) 

9 

Sprite 

0 

(oder 

1) 

mit 

Sprite 

2 

(oder 

3) 

8 

Gerade 

Bitplanes 

(Playfield 2) 

mit Sprite 6 (oder 7) 
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7 

Gerade 

Bitplanes 

(Playfield 

2) 

mit 

Sprite 

4 

(oder 

5) 

6 

Gerade 

Bitplanes 

(Playfield 

2) 

mit 

Sprite 

2 

(oder 

3) 

5 

Gerade 

Bitplanes 

(Playfield 

2) 

mit 

Sprite 

0 

(oder 

1) 


4 Ungerade Bitplanes (Playfield 1) mit Sprite 6 (oder 7) 

3 Ungerade Bitplanes (Playfield 1) mit Sprite 4 (oder 5) 

2 Ungerade Bitplanes (Playfield 1) mit Sprite 2 (oder 3) 

1 Ungerade Bitplanes (Playfield 1) mit Sprite 0 (oder 1) 

0 Gerade Bitplanes (Playfield 2) mit ungeraden Bitplanes 
(Playfield 1) 

Die ungeraden Sprites sind in Klammern gesetzt, weil diese 
nicht unbedingt zur Kollision hinzugezogen werden müssen. 
Wie wir wissen, sind die Sprites paarweise zugeordnet, lei¬ 
der auch bei der Kollisions-Abfrage. Man kann zwar wahlweise 
die ungeraden Sprites mit in die Abfrage einbeziehen, aber 
man kann mittels dieses Registers, im Falle einer Kollision, 
nicht unterscheiden, welches der beiden Sprites betroffen 
ist. Arbeitet man mit mehreren Sprites und ist eine Kollisi¬ 
ons-Abfrage für diese unumgänglich und ist es darüberhinaus 
auch nicht möglich, die Objekte so zu plazieren, daß sie nur 
als gerade Sprites verwendet werden können, so empfiehlt es 
sich, z.B. zu einer Koordinaten-Abfrage zu greifen. 

Für unser Spiel wollen wir das, vom Spieler gelenkte, Sprite 
(Sprite 0) auf Kollision mit dem roten Punkt (Sprite 2), dem 
grünen (Sprite 4) und dem gelben (Sprite 6) Objekt testen. 


collision: 


nocolly: 


cmp.b 

#$01,fin ;Kollisionsabfrage 

beq.s 

nocolly 

move 

$dffOOe,d5 

btst 

#9,d5 

bne 

explusion 

btst 

#10,d5 

bne 

contactl 

btst 

#11,d5 

bne 

rts 

contact2 
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Wird eine Kollsion durch das grüne Sprite verzeichnet, soll 
das violette Spieler-Symbol die Farbe auf Türkis wechseln. 
Dazu müssen wir folgende Routine schreiben: 

contactl: move.b #1,frage /Kollision mit grünem 

move #$00fc,sprr0+6 /Sprite 
move #$00ca,sprr0+10 

move #$00a8,sprrO+14 
rts 

Hat der Spieler zuerst grün berührt und ist anschließend mit 
gelb zusammengestoßen, so soll er wieder die ursprüngliche 
Farbe erhalten und eine Nummer auf dem Anzeigenteil durchge¬ 
strichen werden. Weiters wird abgefragt, ob sich dieser Vor- 


gang schon 

zehnmal wiederholt hat. Ist dies der 

Fall, wird 

das Spiel 

beendet. 




contact2: 

cmp.b 

#1,frage 

/Kollision 

mit gelbem 


bne.s 

nocontact 

/Sprite 



move 

#$0f0c,sprr0+6 




move 

#$0c0a,sprr0+10 




move 

#$0a08,sprrO+14 




add.l 

#2,kreuzptr 




clr .b 

frage 




cmp. 1 

#18,kreuzptr 




bne.s 

contdraw 




move 

#$00f0,sieger+2 




move.b 

#1,fin 




move.b 

#1,end 




move.b 

#2,annis 




rts 




contdraw: 

bsr 

drawfinis 

/Zahl durchstreichen 

nocontact: 

rts 





Bei der Playfield Kollisions-Erkennung, läßt sich sogar ge¬ 
nauer definieren, bei welcher Farbe (Bitkombination) eine 
Kollision ausgelöst werden soll. Sehen Sie dazu die Belegung 
des folgenden Registers: 
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CLXCON ($dff098) 


Bit 

Name 

Funktion 

15 

ENSP7 

Sprite 7 zur Kollision zulassen 

14 

ENSP5 

Sprite 5 zur Kollision zulassen 

13 

ENSP3 

Sprite 3 zur Kollision zulassen 

12 

ENSP1 

Sprite 1 zur Kollision zulassen 

11 

ENBP6 

Bitplane 6 zur Kollision zulassen 
(MVBP-Wert erforderlich!) 

10 

ENBP5 

Bitplane 5 zur Kollision zulassen 
(MVBP-Wert erforderlich!) 

9 

ENBP4 

Bitplane 4 zur Kollision zulassen 
(MVBP-Wert erforderlich!) 

8 

ENBP3 

Bitplane 3 zur Kollision zulassen 
(MVBP-Wert erforderlich!) 

7 

ENBP2 

Bitplane 2 zur Kollision zulassen 
(MVBP-Wert erforderlich!) 

6 

ENBP1 

Bitplane 1 zur Kollision zulassen 
(MVBP-Wert erforderlich!) 

5 

MVBP6 

Wert für Bitplane 6 Kollision 

4 

MVBP5 

Wert für Bitplane 5 Kollision 

3 

MVBP4 

Wert für Bitplane 4 Kollision 

2 

MVBP3 

Wert für Bitplane 3 Kollision 

1 

MVBP2 

Wert für Bitplane 2 Kollision 

0 

MVBP1 

Wert für Bitplane 1 Kollision 
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Mit den Bits 15-12 lassen sich die ungeraden Sprites zu 
einer Kollisions-Erkennung einschalten. Gerade Sprites sind 
immer aktiviert. 

Die Bits 11-6 bestimmen die, zur Kollision zugelassenen 
Bitplanes. Es werden nur die aktivierten Bitplanes vergli¬ 
chen. 

Die restlichen Bits bestimmen, welches Bitmuster der jewei¬ 
ligen Bitplane, die natürlich aktiviert werden muß, zur Kol¬ 
lision herangezogen werden soll. So ist es möglich, z.B. ei¬ 
ne einzelne Farbe auf Kollision zu überprüfen. 

In unserem Spiel soll sich der Spieler nur auf dem hinteren 
Playfield bewegen, wenn nicht, so soll seine Lebensenergie 
geringer werden. Dafür müssen wir folgende Bitkombination 
verwenden: 

move #%0000000001000001,$dff098 

Diese Initialisierung muß natürlich am Anfang des Programms 
geschehen. Innerhalb der Hauptschleife fügen wir noch die 
Abfrage der Kollision für die Bitplanes ein: 

btst #5,d5 
beq coli 

btst #1,d5 
beq coli 


Jetzt fehlt noch die Unterroutine, die bestimmt, was gesche¬ 
hen soll, wenn eine Kollision stattgefunden hat. 

coli: add.b #1,counter ;Keine Kollision mit 

cmp.b #10,counter ;Bitplane 

bne.s nosubtr 
clr.b counter 
move.l powercount,a0 
clr.b (aO) 

cmp.1 #pic3+i364,powercount 

beq.s explosion 
add.1 #40,powercount 

nosubtr: rts 
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Mit dem "counter" wird festgelegt, wie schnell die Energie 
absinken soll. Anschließend wird eine Zeile (1 Byte breit) 
auf der Anzeigetafel gelöscht. Ein cmp-Befehl vergleicht, ob 
schon das Ende der Energie erreicht wurde, wenn ja wird zu 
"explosion" verzweigt. 
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3.4. SOUND-PROGRAMMIERUNG 


Es gibt mehrere Möglichkeiten, Musik auf dem Amiga zu gene¬ 
rieren. Wir wollen uns aber auf die einfachste Lösung be¬ 
schränken, nämlich die einen Sample abzuspielen. 

Diese Methode hat den Vorteil, daß sie sehr einfach zu pro¬ 
grammieren ist. Da sie sehr viel Speicher kostet, kann man 
jedoch keine sehr langen Musikstücke abspielen. Ist der Sam¬ 
ple abgespielt, wird wieder von vorne begonnen. Damit das 
Ganze nicht zu langweilig wird, kann man Abhilfe schaffen, 
indem man mehrere kurze Klänge digitalisiert und wie Noten 
abspielt. Da der Amiga vier Tonkanäle zur Verfügung stellt, 
ist es möglich vierstimmige Lieder mit Hilfe eines Editors 
zu komponieren. Die so erstellten Musikstücke benötigen na¬ 
türlich viel weniger Speicherplatz und können minutenlang 
gespielt werden. Diese Musik zu programmieren ist ein ziem¬ 
lich schwieriges Kapitel, und man könnte ein dickes Buch da¬ 
mit füllen. Das würde den Rahmen dieses Buches sprengen, da¬ 
her wollen wir uns mit der einfachsten Methode befassen. 


Um zu verstehen, wie der Amiga einen im Speicher liegenden 
Sample ausliest und abspielt, ist es nötig die verwendeten 
Register zu kennen: 


AUDOLCH ($dffOaO) Zeiger auf Daten (high-word) 
AUDOLCL ($dff0a2) Zeiger auf Daten (low-word) 


Diese Register zeigen auf die, im Speicher liegenden, Musik¬ 
daten, die auf dem ersten Tonkanal abgespielt werden sollen. 
High- und low-word werden in zwei Registern getrennt verwal¬ 
tet, aber wir können beide Register mit einem MOVE-Befehl 
initialisieren. 


AUD1LCH ($dffObO) 
AUD1LCL ($dff0b2) 
AUD2LCH ($dffOcO) 
AUD2LCL ($dff0c2) 
AUD3LCH ($dffOdO) 
AUD3LCL ($dff0d2) 


Zeiger auf Daten 
Zeiger auf Daten 
Zeiger auf Daten 
Zeiger auf Daten 
Zeiger auf Daten 
Zeiger auf Daten 


(high-word) 

(low-word) 

(high-word) 

(low-word) 

(high-word) 

(low-word) 
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Die gleichen Register existieren natürlich analog zu den an¬ 
deren drei Tonkanäle. 

AUDOLEN ($dff0a4) Länge der Musik in Worten (Kanal 0) 

AUDILEN ($dff0b4) Länge der Musik in Worten (Kanal 1) 

AUD2LEN ($dff0c4) Länge der Musik in Worten (Kanal 2) 

AUD3LEN ($dff0d4) Länge der Musik in Worten (Kanal 3) 

In diesen Register wird den vier Tonkanälen die Länge des, 
zu spielenden, Samples zugewiesen. Diese wird aber nicht in 
Bytes sondern in Words angegeben. Das bedeutet, die Länge 
des Musikstückes muß durch 2 geteilt werden. 

AUDOPER ($dff0a6) Sampleperiode (Kanal 0) 

AUDIPER ($dff0b6) Sampleperiode (Kanal 1) 

AUD2PER ($dff0c6) Sampleperiode (Kanal 2) 

AUD3PER ($dff0d6) Sampleperiode (Kanal 3) 

Hier wird die Sampleperiode eingetragen. Diese Rate be¬ 
stimmt, in welchen Abständen ein Datenbyte ausgegeben wird. 
Dadurch wird die Frequenz des zu spielenden Tons definiert. 

AUDOVOL ($dff0a8) Lautstärke (Kanal 0) 

AUD1VOL ($dff0b8) Lautstärke (Kanal 1) 

AUD2VOL ($dff0c8) Lautstärke (Kanal 2) 

AUD3VOL ($dff0d8) Lautstärke (Kanal 3) 

Zuletzt wird die Lautstärke bestimmt. Diese kann einen Wert 
von 0 (aus) bis 64 (volle Lautstärke) annehmen. Der Vorteil 
liegt darin, daß jeder Tonkanal mit unterschiedlicher Laut¬ 
stärke belegt werden kann, was zur Erzeugung der verschie¬ 
densten Effekte verwendet werden kann. 

Nun können wir mit der Initialisierung unserer Musikroutine 
beginnen. Wir werden zwei der vier Tonkanäle verwenden. Die 
Musik liegt im Speicher unter dem Label "music". 

initmusic: move.l #music,$dff0a0 

move #$9234,$dff0a4 

move #200,$dff0a6 

move #$40,$dff0a8 

move.1 #music,$dffObO 
move #$9234,$dff0b4 

move #200,$dff0b6 

move #$40,$dff0b8 


130 



KAPITEL 3 


DIE PROGRAMMIERUNG 


Das wäre schon alles, es fehlt nur noch das Einschalten 
selbst. Dazu sehen wir uns das Register DMACON ($dff096) an: 

DMACON ($dff096) 


Bit 

Name 

Funktion 

15 

SET/CLR 

Das setzen/löschen control-Bit 

14 

BBUSY 

Blitter status - testet ob der Blitter gerade 
arbeitet oder nicht (nur lesen). 

13 

BZERO 

Blitter zero Status - Das Ergebnis jeder 
Blitteroperation war 0 (nur lesen). 

12 

- 

unbelegt 

11 

- 

unbelegt 

10 

BLTPRI 

Blitter priority - Der Blitter hat Vorrang 
gegenüber dem Prozessor. 

9 

DMAEN 

DMA enable - Gesamtes DMA einschalten 
(gilt für Bits 0-8). 

8 

BPLEN 

Bitplane DMA enable - Bitplane DMA ein¬ 
schalten 

7 

COPEN 

Copper DMA enable - Copper DMA einschalten. 

6 

BLTEN 

Blitter DMA enable - Blitter DMA einschalten. 

5 

SPREN 

Sprite DMA enable - Sprite DMA einschalten. 

4 

DSKEN 

Disk DMA enable - Disk DMA einschalten. 

3 

AUD3EN 

Audio DMA channel 3 enable - Audiokanal 3 
einschalten. 

2 

AUD2EN 

Audio DMA channel 2 enable - Audiokanal 2 
einschalten. 

1 

AUDIEN 

Audio DMA channel 1 enable - Audiokanal 1 
einschalten. 
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0 AUDOEN Audio DMA channel 0 enable - Audiokanal 0 
einschalten. 


Will man die Bits dieses Registers verändern, so muß man be¬ 
sonders auf das 15. Bit achten, da dieses entscheidet, ob 
die anderen Bits gesetzt oder gelöscht werden. Ist Bit 15 
gelöscht, so werden alle anderen gesetzten Bits gelöscht. 
Ist das SET/CLR-Bit hingegen gesetzt, so werden alle anderen 
gesetzten Bits ebenfalls gesetzt. Verwirrend? Ein Beispiel 
verschafft Klarheit. 

Um nun den ersten und den zweiten Kanal einzuschalten, müs¬ 
sen wir nicht nur die Bits für diese Kanäle setzen, sondern 
auch das control-Bit (Bit 15). 

move #$8003,$dff096 

Der Wert #$8003 ergibt sich aus der Bitkombination der ge¬ 
setzten Bits 15,1 und 0. Man könnte natürlich auch wie folgt 
das Register initialisieren: 

move #%1000000000000011,$dff096 

Um die Musik wieder auszuschalten, setzen wir die Audio-Bits 
nocheinmal, aber da wir die Bits löschen wollen, muß auch 
das SET/CLR-Bit gelöscht werden. 

move #$0003,$dff096 
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3.5. DER BLITTER 

Neben dem Copper gehört der Blitter mit zu den wichtigsten 
Coprozessoren des Amigas. Das Wort Blitter stammt aus dem 
Englischen und ist eine Abkürzung für "Block Image Transfe- 
rer", was auf Deutsch soviel wie "Bilddaten-Verschieber" 
heißt. Wie der Name schon vermuten läßt, ist es seine Haupt¬ 
aufgabe, Daten im Speicher zu verschieben. Da er dies mit 
sehr großer Geschwindigkeit schafft, werden meistens Grafik¬ 
daten im Speicher kopiert. Daher hört man den Namen Blitter 
meistens in Zusammenhang mit Spielen und Grafikprogrammen. 
Tatsache ist aber, daß man mit dem Blitter auch die ver¬ 
schiedensten Verknüpfungen programmieren kann. Daher wird er 
oft zur Codierung und Decodierung von Daten, insbesondere 
von Disketten verwendet. 

Weitere Anwendungsgebiete des Blitters sind das Zeichnen von 
Linien und das Füllen von Flächen. All diese Aufgaben kann 
der Blitter um einiges schneller erledigen, als der 68000er. 
Daher wird er sehr häufig in Spielen verwendet, um schnelle 
Animationen zu garantieren. Aber auch das Betriebssystem be¬ 
dient sich seiner Hilfe um Fenster, Gadgets und Images zu 
bewegen oder richtig zu plazieren. 

In unserem Spiel wird der Blitter nicht eingesetzt, weil wir 
weder große Datenblöcke kopieren, noch Zeit sparen müssen. 
Wir kopieren unsere Daten mit Hilfe des 68000er. 

Der Vollständigkeit wegen, wollen wir in diesem Buch jedoch 
nicht auf den Blitter verzichten. 


Die Anwendung des Blitters ist ziemlich einfach, und läuft 
jedesmal gleich ab. Es gibt drei verschiedene Datenquellen, 
die logisch miteinander verknüpft werden können. Das Ergeb¬ 
nis wird in die Zielquelle geschrieben, welche wir ebenfalls 
frei im Speicher wählen können. Diese Speicherbereiche, in 
denen unsere Quellen liegen, müssen sich im Chip-Memory be¬ 
finden, damit der Blitter darauf zugreifen kann. 

Um den Blitter, Daten kopieren zu lassen, müssen wir ihm 
vorher einige Informationen übermitteln, die er für seine 
Aufgabe benötigt: 
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o Den gewünschten Modus (kopieren, füllen 
oder Linien ziehen anwählen). 

o Den oder die Quellbereiche bestimmen. 

o Den Zielbereich festlegen. 

o Verknüpfung und Maskierung auswählen. 

o Weitere Parameter definieren, wie zum Bei¬ 
spiel: Scrolling, Moduli, ... 

o Fenstergröße festlegen -> Blitter starten. 


Der letzte Punkt, die Bestimmung der Fenstergröße, ist für 
den Blitter gleichzeitig das Signal zum Starten des Kopier¬ 
vorganges. Daher muß man diese Funktion als letzte Initiali¬ 
sieren. 
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3.5.1. DIE BLITTERREGISTER 

Um die oben erklärten Definitionen dem Blitter mitzuteilen, 
gibt es folgende Register: 


BLTSIZE ($dff058) 

Dieses Register legt nicht nur, wie der Name schon vermuten 
läßt, die Größe des Blitterfensters fest, sondern, es star¬ 
tet den Blitter auch gleich. Daher muß dieses Register als 
letztes initialisiert werden, da dem Blitter sonst noch nö¬ 
tige Informationen fehlen. Wie sieht aber das Blitterfenster 
aus? Das Blitterfenster ist jener Speicherbereich, der vom 
Blitter während der Operation verwendet wird. Eingeteilt 
wird der Speicher, genau wie bei den Bitplanes, in Spalten 
und Zeilen. Eine Spalte entspricht einem Word = zwei Byte. 


Sehen wir uns nun die genauere Biteinteilung des BLTSIZE- 
Registers an: 

Bits: 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 0 
H9 H8 H7 H6 H5 H4 H3 H2 Hl HO W5 W4 W3 W2 W1 WO 


Die ersten zehn Bits bestimmen die Höhe des Blitterfensters. 
Die Höhe wird in Zeilen angegeben, welche zwischen 0 und 2 
hoch 10 (=1024) liegen kann. Will man 1024 Zeilen anwählen, 
so sind alle Bits auf Null zu setzen. Eine Höhe von Null 
Zeilen ist logischerweise nicht möglich. 

Die restlichen sechs Bits stehen für die Breite, welche 
ebenfalls eine Größe von 0 bis 1024 Pixel haben darf. Die 
Breite wird in Words angegeben; 1 Word hat 16 Bits (=16 Pi¬ 
xel) - maximal 64 Words ergeben: 64*16=1024. 

Es gilt hier die gleiche Regelung wie bei der Höhe: Will man 
64 Words wählen, so sind diese Bits auf Null zu setzen. Eine 
Breite von Null Words ist unmöglich. 

Um nun den richtigen Wert für BLTSIZE zu ermitteln, bedient 
man sich einer ganz einfachen Formel: 

BLTSIZE = Höhe*64 + Breite in Words 
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BLTAPTH ($dff050) 

Dieses Register enthält, zusammen mit dem Register BLTAPTL 
($dff052), die Startadresse der Quelle A. Es existieren ins¬ 
gesamt vier Register (A, B, C und D). Davon sind drei (A, B 
und C) die Quellregister und eines (D) das Zielregister. Der 
Blitter holt die Informationen aus den entsprechenden Quell¬ 
registern, verknüpft sie wahlweise miteinander und schreibt 
das Ergebnis in das Zielregister D. In BLTAPTH liegen die 3 
high Bits der Startadresse. Am Ende einer Blitteroperation 
liegt in diesen Registern die Adresse des letzten Words plus 
2, plus dem entsprechenden Modulo Wert. 


BLTAPTL ($dff052) 

In diesem Register liegen die 15 low Bits der Startadresse 
von Quellregister A. Man kann beide Register mit einem ein¬ 
zigen Move Befehl beschreiben: 

move.1 #pic,$dff052 


BLTBPTH ($dff04c) 

BLTBPTL ($dff04e) 

BLTCPTH ($dff048) 

BLTCPTL ($dff04a) 

BLTDPTH ($dff054) 

BLTDPTL ($dff056) 

Die oben angeführten Register, sind genauso zu behandeln, 
wie BLTAPTH und BLTAPTL. 
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BLTAMOD ($dff064) 

In diesem Register befindet sich der Modulo Wert für die 
Quelle A. Da der Blitter genau wie die Playfields auch mit 
rechteckigen Speicherbereichen arbeitet, müssen wir ihm ei¬ 
nen Modulowert zuteilen. Die Funktionsweise der Modulo Werte 
ist im Kapitel 4.2 Playfields genau erklärt. 


BLTBMOD ($dff062) 

BLTCMOD ($dff060) 

BLTDMOD ($dff066) 

Modulo Werte gibt es sowohl für alle Quellregister, als auch 
für das Zielregister. Die Anwendung ist bei allen gleich. 


BLTAFWM ($dff044) 

Wie wir oben erfahren haben, läßt sich der Blitter nur wort¬ 
weise steuern, was ist also zu tun, wenn man eine Grafik ko¬ 
pieren möchte, die über eine Wortgrenze hinausragt. Hier 
bietet uns der Blitter die Möglichkeit, die ungewünschten 
Bits der "überhängenden" Wörter auszumaskieren, sprich weg¬ 
zulassen. Mit diesem Register wird das erste Word ausmas¬ 
kiert. Die Maskierung funktioniert ziemlich einfach: Jedes 
auf 1 gesetzte Bit wird beim Kopiervorgang übernommen. Alle 
nicht gesetzten Bits werden gelöscht. 

Ein Beispiel: 

Nehmen wir an, unser Objekt besteht aus drei Words, wobei 
sowohl das erste als auch das letzte nur zur Hälfte übernom¬ 
men werden, das mittlere hingegen ganz kopiert werden soll. 
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Vor der Operation: 


Word 1 

0000111111110000 

0001111111111000 

0011111111111100 

0111111111111110 

1111111111111111 

0111111111111110 

0011111111111100 

0001111111111000 

0000111111110000 


0000000011111111 

0000000011110000 

0000000011111000 

0000000011111100 

0000000011111110 

0000000011111111 

0000000011111110 

0000000011111100 

0000000011111000 

0000000011110000 


Word 2 

0000111111110000 

0001111111111000 

0011111111111100 

0111111111111110 

1111111111111111 

0111111111111110 

0011111111111100 

0001111111111000 

0000111111110000 


0000111111110000 

0001111111111000 

0011111111111100 

0111111111111110 

1111111111111111 

0111111111111110 

0011111111111100 

0001111111111000 

0000111111110000 


Word 3 

0000111111110000 

0001111111111000 

0011111111111100 

0111111111111110 

1111111111111111 

0111111111111110 

0011111111111100 

0001111111111000 

0000111111110000 


folgender Masks: 
BLTALWM: 

1111111100000000 

0000111100000000 

0001111100000000 

0011111100000000 

0111111100000000 

1111111100000000 

0111111100000000 

0011111100000000 

0001111100000000 

0000111100000000 


Nach der Operation durch Verwendung 
BLTAFWM: 


BLTALWM ($dff046) 

Dieses Register bestimmt die Maske des letzten Words. Sowohl 
BLTAFWM als auch BLTALWM sollten im Line- und im Fill-Modus 
auf eins gesetzt werden. 
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BLTCONO ($dff040) 

Bevor wir uns die Belegung dieses Registers ansehen, müssen 
wir zuerst noch einiges klären: Wir wissen, daß der Blitter 
wortweise arbeitet. Will man aber ein Objekt, das nicht an 
einer Wortgrenze endet kopieren, muß man, wie oben schon er¬ 
läutert, das erste und das letzte Wort ausmaskieren. Was 
soll man aber tun, wenn man eine Grafik lediglich verschie¬ 
ben möchte? 

Auch dafür stellt uns der Blitter eine Funktion zur Verfü¬ 
gung. Mit den Bits 12-15 wird bestimmt, um wieviele Bits 
verschoben werden soll. Die hinausgeschobenen Bits werden 
beim nächsten Word wieder hinein'geshiftet'. Sehen wir uns 
ein Beispiel an: 

Vor dem Verschieben: 

0001010111000000 

Nach dem Verschieben: 

XXXX000101011100 

In unserem Beispiel wurde das Wort um vier Bits verschoben. 
Die "xxxx" repräsentieren jene Bits, die im vorhergehenden 
Wort stehen. Eine Verschiebung gibt es nur für Quelle A und 
B. Die Bits zur Steuerung von Quelle B befinden sich im Re¬ 
gister BLTCON1. 


Wie schon oben erwähnt, bietet uns der Blitter die Möglich¬ 
keit, die drei Quellregister logisch miteinander zu verknüp¬ 
fen. Das Ergebnis dieser Verknüpfung wird in dem Zielregi¬ 
ster D abgelegt. Uns stehen acht unterschiedliche Bit-Tripel 
zur Verfügung (2 hoch 3=8). Diese sind in den LFx-Bits 
(Bits 0-7) enthalten. Diese Bit-Tripel nennt man Miniterms. 
Mittels dieser Miniterms kann der Anwender bestimmen, wie 
das Ergebnis in D gebildet werden soll. 
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Sehen 

wir uns 

die Bit-Belegung des Registers an: 


Bit 

Name 

Funktion 


15 

ASH3 

Diese vier Bits beinhalten den Wert 

der 



Verschiebung von Quelle A. Sind alle 4 Bits 



auf Null gesetzt, so findet keine 
bung statt. 

Verschie- 

14 

ASH2 



13 

ASH1 



12 

ASHO 



11 

USEA 

DMA-Kanal für Quelle A einschalten. 


10 

USEB 

DMA-Kanal für Quelle B einschalten. 


9 

USEC 

DMA-Kanal für Quelle C einschalten. 


8 

US ED 

DMA-Kanal für Ziel D einschalten. 


7 

LF7 

Miniterm ABC (=111) 


6 

LF6 

Miniterm ABc (=110) 


5 

LF5 

Miniterm Abc (=101) 


4 

LF4 

Miniterm Abc (=100) 


3 

LF3 

Miniterm aBC (=011) 


2 

LF2 

Miniterm aBc (=010) 


1 

LF1 

Miniterm abC (=001) 


0 

LFO 

Miniterm abc (=000) 
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BLTCON1 ($dff042) 

Bit Name Funktion 


15 BSH3 

14 BSH2 

13 BSH1 

12 BSHO 

11-5 
4 EFE 


3 IFE 

2 FCI 

1 DESC 


Diese vier Bits beinhalten den Wert der 
Verschiebung von Quelle B. Sind alle 4 Bits 
auf Null gesetzt, so findet keine Verschie¬ 
bung statt. 


unbenützt 

Exclusive Fill Enable 

Mit den Bits 2, 3 und 4 sind nur in Zusammen¬ 
hang mit der Funktion Flächen füllen interes¬ 
sant. Wollen Sie aber normal arbeiten, so 
sind beide Bits auf Null zu setzen. 

Inclusive Fill Enable 

Fill Carry In 

Wenn dieses Bit eins ist, dann ist der 
decending Modus aktiviert. Wenn nicht, arbei¬ 
tet der Blitter normal im ascending Modus. 
Was bedeuten nun diese beiden Modi? Normaler¬ 
weise arbeitet der Blitter aufsteigend 
(ascending), das heißt, er beginnt mit dem 
Kopieren der Daten bei der Anfangsadresse und 
erhöht diese solange bis er bei der Endadres¬ 
se angelangt ist. Will man aber einen Spei¬ 
cherbereich kopieren, wobei sich Quelle und 
Ziel teilweise überlappen, so führt dies 
nicht zum gewünschten Ergebnis. Daher kann 
man den Blitter auch umgekehrt arbeiten las¬ 
sen, nämlich absteigend (descending). Er be¬ 
ginnt jetzt bei der Endadresse und subtra¬ 
hiert solange bis er bei der Startadresse an¬ 
gelangt ist. 
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0 LINE Wird dieses Bit auf eins gesetzt, so ist 

der Line-Modus aktiviert und der Blitter kann 
zum Ziehen von Linien verwendet werden. 


BLTADAT ($dff074) 

BLTBDAT ($dff072) 

BLTCDAT ($dff070) 

BLTDDAT ($dffOOO) 

Die Daten die kopiert werden sollen, werden vom Blitter, mit 
der Hilfe von vier DMA Kanälen, aus dem Speicher geholt, be¬ 
arbeitet (verknüpft) und anschließend wieder zurück ge¬ 
schrieben. Nach der Verarbeitung steht das Ergebnis in 
BLTDDAT und wird danach ins RAM (Chip-Ram) geschrieben. Man 
kann jeden dieser Kanäle, mit den USEx-Bits des Registers 
BLTCONO einzeln an- oder ausschalten. Will man einen Kanal 
sperren, so ist das entsprechende USEx-Bit auf Null zu set¬ 
zen, sowie bei der Auswahl der Miniterme darauf zu achten, 
daß diese keinen Einfluß auf diesen Kanal nehmen. 


Die folgenden Bits aus dem Register DMACON beeinflußen eben¬ 
falls den Blitter. 

DMACON ($dff096) 

Bit Name Funktion 


14 

BBUSY 

Blitter Status - testet ob der Blitter gerade 
arbeitet oder nicht (nur lesen). 

13 

BZERO 

Blitter zero Status - Das Ergebnis jeder 
Blitteroperation war 0 (nur lesen). 

10 

BLTPRI 

Blitter priority - Der Blitter hat Vorrang 
gegenüber dem Prozessor. 

6 

BLTEN 

Blitter DMA enable - Blitter DMA einschalten. 
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3.5.2. EINFACHE BLITTEROPERATIONEN 


Nach der langen Theorie wollen wir uns die Praxis, anhand 
von zwei Beispiel-Programmen, ansehen. 

Wie man einen Speicherbereich mittels move-Befehl löscht, 
wissen wir bereits. Nun wollen wir dafür den Blitter zu Hil¬ 
fe nehmen, der diese Aufgabe in viel kürzerer Zeit erledigt 
als der Prozessor. Sehen wir uns ein Beispielprogramm an, 
das ein Feld der Größe 320 mal 256 Punkten (320/8*256=10240 
Byte) löscht. Diesen Speicherbereich definieren wir am Ende 
unseres Programms mit der Anweisung 

pic: blk.b 10240,$ff 

$ff bedeutet, daß der reservierte Speicher beim Assemblieren 
mit dem Hex-Wert $ff gefüllt wird. Dadurch können wir nach 
dem Start kontrollieren, ob unser Programm richtig gearbei¬ 
tet hat. Danach fragen wir den Blitter, ob er gerade be¬ 
schäftigt ist: 

clearpic: btst #14,$dff002 
bne.s clearpic 

Ist er gerade beim Kopieren von Daten, so verzweigt das Pro¬ 
gramm in die Schleife und wartet, bis er seine Aufgabe been¬ 
det hat. Der nächste Schritt ist das Initialisieren des 
Zielkanals. 


move.l #pic,$dff054 

Außerdem löschen wir die Register, die wir für unsere Opera¬ 
tion nicht benötigen. Dies sind die Moduli sowie das Regi¬ 
ster BLTCON1. 

clr $dff066 
clr $dff042 

Jetzt müssen wir noch den Zielkanal einschalten: 

move #%0000000100000000,$dff040 
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Abschließend wird die Größe des Blitterfensters festgelegt 
und der Blitter somit in Gang gesetzt. 

move #[256*64]+[320/16],$dff058 

Nun können wir das Programm starten. 

Zur Überprüfung sehen wir uns den Speicher mit 

q.l pic 

an. Es sollten ab dieser Adresse nur noch Nullen anstatt des 
Strings $ff stehen. Abschließend finden Sie das komplette 
Listing: 


; loescht eine 320x256 grosses Fenster 

; mit Hilfe des Blitters 

7 

clearpic: btst #14,$dff002 

bne.s clearpic 
7 

move.l #pic,$dff054 
clr $dff066 

clr $dff042 

move #%0000000100000000,$dff040 
move #[256*64]+[320/16],$dff058 

7 

rts 

pic: blk.b 10240,$ff 


Jetzt wollen wir eine Routine schreiben, die ein 32 farbiges 
Bob in einen Bildschirm, mit ebenfalls fünf Bitplanes, hin¬ 
einkopiert. Wir werden jede Plane mit einem Blitvorgang du¬ 
plizieren und dazu den Blitter fünfmal starten. Diese Metho¬ 
de benötigt viel Zeit, ist aber leichter zu verstehen. Dazu 
lesen wir den Anfang der ersten Plane in al ein und addieren 
nach jedem Blit $2800 hinzu, um an den Beginn der nächsten 
Plane zu gelangen. Der Wert aus al wird in das Zielregister 
übertragen: 

label: move.l al,$dff054 
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Außerdem setzen wir alle nichtbenötigten Register auf Null. 

blitten: clr.w $DFF042 

clr.w $DFF064 

Da wir weder das erste noch das letzte ‘Word* ausmaskieren 
wollen, müssen wir sämtliche Bits auf eins setzen. 

move.w #$ffff,$dff044 
move.w #$ffff,$dff046 

Darüberhinaus wird der Modulo-Wert für die Zielguelle ange¬ 
geben, sowie der DMA-Kanal für Quelle A und Ziel D einge¬ 
schalten. Weiters werden alle Miniterms gewählt, welche bei 
A eine wahre Aussage liefern. Dies sind die Bits LF4 - LF7. 

move.w #%0000100111110000,$DFF040 
move.w #$24,$DFF066 

Abschließend berechnen wir noch die Größe des Blitter- 
Fensters und starten es. Unser Bob ist 32 mal 25 Punkte 
groß, daher errechnet sich die Fenstergröße wie folgt aus 
der bekannten Formel: 

BLTSIZE = Höhe*64 + Breite in Words 

BLTSIZE = 25*64 + 2 

BLTSIZE = 1602 ($642) 

Sehen wir uns nun das fertige Programm an, das einen Screen 
mit 5 Bitplanes erstellt und ein 32 farbiges Bob hineinko¬ 
piert. Damit Sie etwas sehen, müssen Sie folgende auf der 
Beispieldiskette enthaltenen Bilder (Hintergrundbild und 
Bob) an die richtigen Positionen laden. Dies geschieht mit 
Hilfe des "ri" Kommandos (Seka-Assembler). 

spiel/1.con —> blitpic 
pictures/5planes.con —> pic 

Hier nun das fertige Beispielprogramm: 
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Einfaches Kopieren mit dem Blitter 


s: bsr.s opening 

bsr.L blitten 


/ 

loop: move.l $dff004,d0 

and.l #$fff00,d0 
cmp.l #$00003000,dO 
bne.s loop 
btst #6,$bfe001 
bne.s loop 

/ 

7 

end: move.w #$c000,$dff09a 

e: rts 

7 

opening: move.w #$4000,$dff09a 

move.l #copperl,$dff084 

move.w #$20,$dff096 

move.l #pic,d0 

move d0,pll+6 

swap dO 

move dO,pll+2 

swap dO 

add.l size,d0 

move d0,pl2+6 

swap dO 

move dO,pl2+2 

swap dO 

add.l size,d0 

move dO,pl3+6 

swap dO 

move dO,pl3+2 

swap dO 

add.l size,d0 

move dO,pl4+6 

swap dO 

move dO,p!4+2 
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/ 

label: 


test: 


copperl: 


pll: 
p!2: 


swap do 
add.l size,dO 
move d0,pl5+6 
swap do 
move do,pl5+2 
rts 

clr.w $DFF042 
clr.W $DFF064 

move.w #$ffff,$dff044 
move.w #$ffff,$dff046 

move.w #%0000100111110000 / $DFF040 
move.w #$24,$DFF066 
move.l #blitpic,$DFF050 
lea pic+2000,al 

moveq #4,d4 

move.l al,$dff054 
add.l #$2800,al 
move.w #$642,$DFF058 

btst #6,$DFF002 
bne.s test 

dbf d4,label 

rts 


dc.w $008e, $2071 
de.w $0090,$20d4 
dc.w $0092,$0038 
dc.w $0094,$00d0 
dc.w $0102,$0000 
dc.w $0104,$0000 
dc.w $0108,$0000 
dc.w $010a,$0000 
dc.w $0100,$5200 
dc.w $00e0,$0000 
dc.w $00e2,$0000 
dc.w $00e4,$0000 
dc.w $00e6,$0000 
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dc.w $00e8,$0000 
dc.w $00ea,$0000 
dc.w $00ec,$0000 
dc.w $00ee,$0000 
dc.w $00f0,$0000 
dc.w $00f2,$0000 
dc.w $0180,$0000 
dc.w $0182,$0f00 
dc.w $0184,$00f0 
dc.w $0186,$000f 
dc.w $0188,$0444 
dc.w $018a,$0555 
dc.w $018c,$0666 
dc.w $018e,$0777 
dc.w $0190,$0888 
dc.w $0192,$0999 
dc.w $0194,$0aaa 
dc.w $0196,$0bbb 
dc.w $0198,$0ccc 
dc.w $019a,$0ddd 
dc.w $019c,$0eee 
dc.w $019e,$0fff 
dc.w $01a0,$0000 
dc.w $01a2,$0111 
dc.w $01a4,$0222 
dc.w $01a6,$0333 
dc.w $01a8,$0444 
dc.w $01aa,$0555 
dc.w $01ac,$0666 
dc.w $01ae,$0777 
dc.w $01b0,$0888 
dc.w $01b2,$0999 
dc.w $01b4,$0aaa 
dc.w $01b6,$0bbb 
dc.w $01b8,$0ccc 
dc.w $01ba,$0ddd 
dc.w $01bc,$0eee 
dc.w $01be,$0fff 
dc.w $ffff,$fffe 

de.1 10240 

blk.b 51200,0 
blk.b 500,0 
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3.6. SONSTIGES 


An dieser Stelle wollen wir uns jenen Dingen widmen, die man 
nicht so recht in eines der vorhergehenden Kapitel einordnen 
kann. 

Außerdem programmieren wir noch einen kleinen Effekt, der 
mit dem Spiel selbst nicht viel zu tun hat, aber für einige 
Programmierer sicherlich interessant ist. Dabei handelt es 
sich um einen Sternen-Himmel, der mit möglichst einfachen 
Mitteln die optimalste Wirkung erzielt. 

Abschließend besprechen wir kurz jene Schritte, die notwen¬ 
dig sind, um alle Einzelteile, die wir bis jetzt program¬ 
miert haben, zum gesamten Spiel zusammenzusetzen. 
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3.6.1. Joystick-Abfrage 


Ein wesentlicher Bestandteil eines Spieles ist wohl die 
Steuerung, denn nichts nervt einen Spieler mehr, als eine 
schlechte Umsetzung der Bewegungen. Daher sollte man auf 
diesen Punkt sehr achten. 

Es gibt mehrere Möglichkeiten den Joystickport auszulesen. 
Wir verwenden eine der kürzesten und schnellsten Methoden. 
Wir lesen das Joystick-Register $dff00c (J0Y1DAT) in ein Da¬ 
tenregister ein und überprüfen den Inhalt. Wird nun der Joy¬ 
stick in eine Richtung bewegt, so stehen in dl folgende Wer¬ 
te: 


0003 

rechts 

0300 

links 

0100 

oben 

0001 

unten 

0200 

links + oben 

0002 

rechts + unten 

0103 

rechts + oben 

0301 

links + unten 


Wir müssen also lediglich mit cmp das Datenregister auf ei¬ 
nen dieser Werte überprüfen, um bei erfolgreichem Vergleich 
in die gewünschte Unterroutine zu verzweigen. Für Port 0 
(Mausport) ist folgendes Register zu verwenden: 

JOYODAT $dff00a 

Die fertige Joystickabfrage für unser Spiel benötigt nur 
vier Bewegungsrichtungen. Wurde der Hebel gedrückt, ver¬ 
zweigt das Programm in die jeweilige Unterroutine und ad¬ 
diert bzw. subtrahiert 1 von der Spriteadresse. Darüberhin- 
aus wird verglichen, ob das Sprite schon eine Randgrenze er¬ 
reicht hat. Wenn ja wird nicht addiert/subtrahiert, sondern 
gleich zum Ende der Routine verzweigt. 
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/ 

; Die komplette Joystick-Abfrage 


/ 

joy: cmp.b #$01,fin 

beq.s j oyout 
clr $dff036 
move $dff00c,dl 
cmp #$0300,dl 
beq.s links 
cmp.b #$03 7 dl 
beq.s rechts 
cmp #$0100/dl 
beq.s oben 
cmp.b #$01/dl 
beq.s unten 

joyout: rts 

links: move.l spritebufferl,d0 

swap dO 
cmp.b #$40/d0 
bls.s joyout 

sub #$0001,spritebufferl 
rts 

rechts: move.l spritebufferl,d0 

swap dO 
cmp.b #$d8/d0 
bhs.s j oyout 

add #$0001 /Spritebufferl 
rts 

oben: move.l spritebufferl,d0 

swap dO 
clr.b dO 
cmp #$3000/dO 
bls.s joyout 

sub.1 #$01000100,spritebufferl 

rts 

unten: move.l spritebufferl,d0 

swap dO 
clr.b dO 
cmp #$ef00,d0 
bhs.s j oyout 

add.1 #$01000100,spritebufferl 

rts 
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Ein weiterer Punkt ist das Auslesen der Feuerknöpfe. Die Ab¬ 
frage des Joystickbuttons ist genau die gleiche, wie die der 
Maus: 


button: btst #6,$bfe001 

bne.s button 


Die Abfrage für Port 1 liegt nur ein Bit weiter, nämlich: 


button: btst #7,$bfe001 

bne.s button 
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3.6.2. TASTATUR-ABFRAGE 


Fast ebenso wichtig wie die Joystick-Abfrage ist die Auswer¬ 
tung der Tastatur. In unserem Spiel kommt dies zwar nicht 
zur Anwendung, trotzdem ist dieses Kapitel interessant. 

Der Amiga besitzt ein intelligentes Keyboard, mit einem ei¬ 
genen Prozessor, der automatisch die Auswertung übernimmt. 
Wir müssen lediglich den Puffer, in welchem die Daten ge¬ 
speichert werden, auslesen. 

Zuerst rettet man den Inhalt des Registers $bfec01, in dem 
sich die zuletzt gedrückte Taste befindet und vergleicht an¬ 
schließend diesen mit den Tastatur-Codes. 

loop: move.b $bfec01,d0 

cmp.b #$41,dO 

bne.s loop 

rts 

Dieses kurze Programm wartet solange, bis die Help-Taste ge¬ 
drückt wurde. Die Codes für die verschiedenen Tasten entneh¬ 
men Sie bitte der untenstehenden Abbildung. Diese entspricht 
der normalen Amiga 500 Tastatur. Es wurden aber auch schon 
andere Tastatur-Arten ausgeliefert z.B. für den Amiga 1000. 
Diese Tastaturen unterscheiden sich durch die Anzahl und An¬ 
ordnung der Tasten. Es gibt Tastaturen, die um einige Tasten 
erweitert wurden. Wenn man obiges Programm so verändert, daß 
es den Wert der gerade gedrückten Zahl liefert, so kann man 
auch die Codes der nicht angeführten Tasten leicht ermit¬ 
teln. 

Wie Sie vielleicht bemerkt haben, entsprechen die angegebe¬ 
nen Codes nicht den ASCII-Codes. Legt man Wert darauf diese 
zu erhalten, so muß man eine Tabelle anlegen, die jedem Code 
das passende ASCII-Zeichen zuordnet. 
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ESI 

IE 

5f | 55d 155b 559 1557 556 553 | 551 54f 54 

D 

m 


■ 


B 

Eli 


$3f 


®SSSBSBS3EÜ3!H5!SHKEHi 


$3' 

$33 

$7f $31 $35 

0 


$4b 

$49 

$47 

$45 

$85 

$83 

$81 

$6b 

$a5 

$a3 

$n 

$43 

$c5 

$c3 

$d 

$79 

$el | 

$87 


BILD 10: Die Tastaturbelegung eines Amiga 500 


$73 $7d 


1*3 

$6l||i65||$63 
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3.6.3. STERNENHIMMEL 


Ein ebenfalls sehr häufig verwendeter Effekt ist das Ster- 
nen-Scrolling. Wir wollen diesen Effekt nachprogrammieren. 
Folgendes Ziel wollen wir uns dabei setzen: 

o 80 Sterne sollen gleichzeitig über den 
Bildschirm bewegt werden. 

o Sie sollen in unterschiedlichen Geschwin¬ 
digkeiten aus der Bildschirmmitte dem 
Betrachter entgegenfliegen. 


Diese Aufgabenstellung hört sich schwieriger an, als sie in 
Wirklichkeit ist. Beginnen wir einmal mit dem Einfachsten, 
dem Erstellen eines Bildschirms mit nur einer Plane. Da un¬ 
sere Sterne einfarbig sind, genügt uns eine Bitplane. 

Als nächstes legen wir eine Tabelle mit den Startkoordinaten 
für X und Y an. Diese Koordinaten geben die Ausgangspositio¬ 
nen unserer Sterne an: 

skorsx: dc.w 70,80,90,100,110,120,130,140,150,160 
de.w 75,89,34,45,145,123,23,43,100,139 


skorsy: dc.w 55,60,65,70,75,80,85,90,95,100 

dc.w 56,76,64,45,67,98,65,54,76,86 


Diese Positionen sind willkürlich im Koordinatensystem ge¬ 
wählt und können nach Belieben geändert werden. In jeder 
Zeile sind 10 Werte eingetragen, das bedeutet, daß noch 60 
weitere fehlen, die wir, der Einfachheit wegen, mit densel¬ 
ben Werten belegt haben. 

Außerdem folgen zwei Tabellen, welche die Richtung und die 
Geschwindigkeit der Sterne innerhalb eines Quadranten fest¬ 
legen. 
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speedl: 


speed2: 


dc.W 1,2,3,4,5,6,2,4,5,6 
de.W 6,4,0,1,3,6,1,7,3,3 
dc.W -1,-2,-3,-4,-5,-6,-2,-4,-5,-6 
dc.W -6,-4,-0,-1,-3,-6,-1,-7,-3,-3 
dc.W -1,-2,-3,-4,-5, -6, -2,-4,-5,-6 
dc.W -6, -4,-0,-1,-3,-6,-1,-7,-3,-3 
dc.W 1,2,3,4,5,6,2,4,5,6 
dc.W 6, 4,0,1,3,6,1,7,3,3 

dc.W 1,1,1,1,1,1,1,1,1,1 
dc.W 1,1,1,1,1,1,0,0,1,1 
dc.w 1,1,1,1,1,1,1,1,1,1 
dc.w 1,1,1,1,1,1,0,0,1,1 
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1 
dc.w -1,-1,-1,-1,-1,-1,0,0,-1,-1 
dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1 
dc.w -1,-1,-1,-1,-1,-1,0,0,-1,-1 


Widmen wir uns als nächstes der eigentlichen Bewegungsrouti¬ 
ne. Zuerst retten wir sämtliche Register, indem wir diese am 
Stack ablegen. 

movestars: movem.l d0-d7/a0-a6,-(a7) 

Der nächste Schritt ist das Einlesen der Koordinaten, sowie 
der Geschwindigkeitsparameter. Weiters wird die Anzahl der 
Sterne in d7 übergeben. 

lea skorsx(pc),a0 
lea skorsy(pc),al 
lea speedl(pc),a2 
lea speed2(pc),a3 
move.l #79,d7 

Nachdem wir alle Parameter in den einzelnen Registern über¬ 
geben haben, können wir in der nächsten Routine mit der Be¬ 
rechnung der richtigen Bildschirm-Position beginnen. Die 
folgenden Zeilen erledigen diese Aufgabe für uns. Zuerst 
werden die Koordinaten, mit denen der äußersten Ränder, ver¬ 
glichen. Ist ein Stern über diese Koordinate bewegt worden, 
so wird er wieder auf die Ausgangsposition (x=160, y=128) 
zurückgesetzt. Dieser Vergleich muß natürlich für alle vier 
Bildschirmseiten durchgeführt werden. 


156 




KAPITEL 3 


DIE PROGRAMMIERUNG 


starloop: move (aO),dO 

move (al),dl 

move (a2)+,d2 

move (a3)+,d3 

move d0,d4 

move dl,d5 

sub d2,d0 

sub d3,dl 

cmp #370,dO 

ble.s nox 

move #160,d0 

move #128,dl 

bra.s noy 

nox: cmp #9,d0 

bge.s nomix 

move #160,d0 

move #128,dl 

bra.s nomiy 

nomix: cmp #270,dl 

ble.s noy 

move #160,dO 

move #128,dl 

bra.s nomiy 

noy: cmp #9,dl 

bge.s nomiy 

move #160,dO 

move #128,dl 

nomiy: move.w d0,(a0) 

move.w dl,(al)+ 


Der letzte Schritt ist das Berechnen der Bildschirmposition, 
sowie das Löschen des zuletzt bewegten Sterns und das Setzen 
des neuen Punktes. Somit wäre unsere Routine für einen Stern 
komplett. Damit der Computer aber 80 Sterne bewegt, müssen 
wir am Ende mit einer dbf-Schleife diesen Vorgang weitere 79 
Mal wiederholen. Abschließend werden die geretteten Register 
wieder zurückgeschrieben. 
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mulu #48,d5 
lsr.w #3,d4 
lea pic(pc),a5 
add d4,a5 
add d5,a5 
clr.b (a5) 

lea pic(pc),a5 
lsr.w #3,d0 
mulu #48,dl 
add d0,a5 
add dl,a5 

move.w (aO)+,dO 
and.w #$7,d0 
move.l #128,dl 
lsr.l dO,dl 
move.b dl,(a5) 

dbf d7,starloop 

movem.1 (a7)+,d0-d7/a0-a6 
rts 


Die Stern-Routine hätten wir fertiggestellt. 80 Punkte flie¬ 
gen von der Bildschirmmitte dem Betrachter quasi entgegen. 
Da sie in verschiedenen Geschwindigkeiten bewegt werden, 
wirkt unser kleines Weltall fast realistisch. Um diesen 3D- 
Effekt noch zu verstärken, werden wir den Sternen verschie¬ 
dene Farben geben (Helligkeitsstufen), damit der Eindruck 
erweckt wird, als ob einige weiter im Hintergrund bewegt 
werden. Diesen Effekt werden wir ohne Zuhilfenahme einer 
weiteren Bitplane programmieren, sondern wir werden dazu den 
Copper verwenden. Wie schon aus der Skizze ersichtlich, ver¬ 
wenden wir zwei Copperlisten, wobei eine von oben nach unten 
und die andere von unten nach oben gescrollt wird. Zuerst 
müssen diese Listen initialisiert werden. 
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Copperliste I wird von 
der Bi Idschirmmitte 
nach oben bewegt. 

Copperliste 2 wird von 
der Bi Idschirmmitte 
nach unten bewegt. 


BILD 11: Der Sternenhimmel 
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t 

initcopper: lea eins(pc),aO 

move #$0001,dO 

move #159,dl 

coppercopy: move dO,(aO)+ 

move #$fffe,(a0)+ 

move #$0182,(a0)+ 

add.w #1,d2 

move d2,(a0)+ 

add #$0100,dO 

dbf dl,coppercopy 

Die oben stehende Copperliste erstellt pro Bildschirmzeile 
einen Wait- und einen Farb-Move-Befehl. Die zweite Copperli¬ 
ste wird analog dazu installiert. Sehen wir uns als nächstes 
jene Routine an, welche die Farben der Copperliste scrollt: 

/ 

scrollcopperl: lea cins+6(pc),a0 

move.l colorptrl(pc),al 
emp.w #$ffff,(al) 

bne.s dascroll 

move.l #colorl,colorptrl 
move.l colorptrl(pc),al 
dascroll: move.w #159,dO 

scrollen: move.w (al)+,(a0) 

emp.w #$ffff,(al) 

bne.s dascrollen 

lea colorl(pc),al 

dascrollen: add.l #8,a0 

dbf dO,scrollen 

add.1 #2,colorptrl 

rts 
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Zum Abschluß finden Sie das komplette Listing, das 80 Sterne 
darstellt und in verschiedenen Geschwindigkeiten und Hellig¬ 
keitsstufen auf dem Bildschirm bewegt. 


s: 


Sternenhimmel 


bsr.s opening 
bsr.l initcopper 


loop: 


r 

end: 

e: 


opening: 


copperl: 


move.l $dff004,d0 
and.l #$fff00,d0 
cmp.l #$00003000,d0 
bne.s loop 
bsr.l movestars 
bsr scrollcopperl 

bsr scrollcopper2 

btst #6,$bfe001 
bne.s loop 


move.w #$c000,$dff09a 
rts 

move.w #$4000,$dff09a 

move.l #copperl,$dff084 

move.w #$20,$dff096 

move.l #pic,d0 

move d0,pll+6 

swap do 

move d0,pll+2 

rts 
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pll: 

eins: 
cins2: 

initcopper: 

coppercopy: 


coppercopyl 


dc.w $008e,$2071 
dc.w $0090,$20d4 
dc.w $0092,$0038 
dc.w $0094,$00d0 
dc.w $0102,$0000 
dc.w $0104,$0024 
dc.w $0108,$0008 
dc.w $010a,$0008 
dc.w $0100,$1200 
dc.w $00e0,$0000 
dc.w $00e2,$0000 
dc.w $0180,$0000 
blk.w 640,0 
blk.w 640,0 
dc.w $ffff,$fffe 


lea 

cins(pc),a0 

move 

#$0001,dO 

move 

#159,dl 

move 

dO,(aO)+ 

move 

#$fffe,(a0)+ 

move 

#$0182,(a0)+ 

add.w 

#1 ,d2 

move 

d2,(aO)+ 

add 

#$0100,dO 

dbf 

dl,coppercopy 

lea 

cins2(pc),a0 

move 

#$a001,d0 

move 

#159,dl 

move 

dO,(aO)+ 

move 

#$fffe,(a0)+ 

move 

#$0182,(a0)+ 

add.w 

#1 ,d2 

move 

d2,(a0)+ 

add 

#$0100,dO 

dbf 

dl,coppercopyl 

rts 
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scrollcopperl: lea 
move.1 
cmp.w 
bne. s 
move.1 
move.1 

dascroll: move.w 

scrollen: move.w 

cmp.w 
bne.s 
lea 

dascrollen: add.l 
dbf 
add.l 
rts 


cins+6(pc),a0 
colorptrl(pc),al 
#$ffff,(al) 
dascroll 

#colorl,colorptrl 
colorptrl(pc),al 
#159,dO 
(al)+,(aO) 

#$ffff,(al) 
dascrollen 
colorl(pc),al 
#8 ,a0 

dO,scrollen 
#2,colorptrl 


/ 

scrollcopper2: lea 
move.1 
cmp.w 
bne.s 
move.1 
move.1 

dascroll2: move.w 
scrollen2: move.w 
cmp.w 
bne.s 
lea 

dascrollen2: sub.l 
dbf 
add.l 
rts 


cins2+i278(pc),a 0 
colorptr2(pc),al 
#$ffff,(al) 
dascroll2 
#color2,colorptr2 
colorptr2(pc),al 
#159,dO 
(al)+,(aO) 

#$ffff,(al) 
dascrollen2 
color2(pc),al 
#8,a0 

d0,scrollen2 
#2,colorptr2 


/ 

colorptrl: 
colorl: 


dc.l colorl 

dc.w $fff,$eee,$ddd,$ccc,$bbb,$aaa,$999,$888 
de .W $777,$666,$555,$444,$333,$222,$111,$000 
dc.w $000,$111,$222,$333,$444,$555,$666,$777 
dc.w $888,$999,$aaa,$bbb,$ccc,$ddd,$eee,$fff 
dc.w $ffff 


/ 

colorptr2: 
color2: 


dc.l color2 

dc.w $fff,$eee,$ddd,$ccc,$bbb,$aaa,$999,$888 
dc.w $777,$666,$555,$444,$333,$222,$111,$000 
dc.w $000,$111,$222,$333,$444,$555,$666,$777 
dc.w $888,$999,$aaa,$bbb,$ccc,$ddd,$eee,$fff 
dc.w $ffff 
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movestars: 


starloop: 


nox: 


nomix: 


noy: 


nomiy: 


movem. 

1 d0-d7/a0-a6,-(a7) 

lea 

skorsx(pc),a0 

lea 

skorsy(pc),al 

lea 

speedl(pc),a2 

lea 

speed2(pc),a3 

move.1 

#79 ,d7 

move 

(aO),d0 

move 

(al),dl 

move 

(a2)+,d2 

move 

(a3)+,d3 

move 

dO ,d4 

move 

dl ,d5 

sub 

d2 ,d0 

sub 

d3,dl 

cmp 

#370 ,d0 

ble.s 

nox 

move 

#160,dO 

move 

#128,dl 

bra.s 

noy 

cmp 

#9 ,d0 

bge.s 

nomix 

move 

#160,dO 

move 

#128,dl 

bra.s 

nomiy 

cmp 

#270,dl 

ble.s 

noy 

move 

#160,dO 

move 

#128,dl 

bra.s 

nomiy 

cmp 

#9,dl 

bge.s 

nomiy 

move 

#160,dO 

move 

#128,dl 

move.w 

dO,(a0) 

move.w 

dl,(al)+ 

mulu 

#48,d5 

lsr .w 

#3,d4 

lea 

pic(pc),a5 

add 

d4,a5 

add 

d5,a5 

clr .b 

(a5) 
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speedl: 


speed2: 


lea pic(pc),a5 
lsr.w #3 ,d0 
mulu #48,dl 
add d0,a5 
add dl,a5 

move.w (aO)+,dO 
and.w #$7,d0 
move.l #128,dl 
lsr.l dO,dl 
move.b dl,(a5) 

dbf d7,starloop 

movem.1 (a7)+,d0-d7/a0-a6 
rts 

de.w l / 2,3 / 4 / 5 / 6,2 / 4,5 / 6 
dc.w 6,4,0,1,3,6,1,7,3,3 

de.w -1,-2,-3,-4,-5,-6,-2,-4,-5,-6 
dc.w -6,-4,-0,-1,-3,-6,-1,-7,-3,-3 

dc.w -1,-2,-3,-4,-5,-6,-2,-4,-5,-6 
dc.w -6,-4,-0,-1,-3,-6,-1,-7,-3,-3 

dc.w 1,2,3,4,5,6,2,4,5,6 
dc.w 6,4,0,1,3,6,1,7,3,3 

dc.w 1,1,1,1,1,1,1,1,1,1 
dc.w 1,1,1,1,1,1,0,0,1,1 

dc.w 1,1,1,1,1,1,1,1,1,1 
dc.w 1,1,1,1,1,1,0,0,1,1 

dc.w -1,-l,-l,-1,-1,-1,-1,-l,-l,-i 
dc.w -1,-1,-1,-1,-1,-1,0,0,-1,-1 

dc.w -1,-1,-1,-1,-1,-1,-1,-1,-1,-1 
dc.w -1,-1,-1,-1,-1,-1,0,0,-1,-1 
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skorsx: 


skorsy: 


pic: 


dc.W 70,80,90,100,110,120,130,140,150,160 
dc.w 75,89,34,45,145,123,23,43,100,139 

dc.W 70,80,90,100,110,120,130,140,150,160 
dc.w 75,89,34,45,145,123,23,43,100,139 

dc.w 70,80,90,100,110,120,130,140,150,160 
dc.w 75,89,34,45,145,123,23,43,100,139 

dc.w 70,80,90,100,110,120,130,140,150,160 
dc.w 75,89,34,45,145,123,23,43,100,139 

dc.w 55,60,65,70,75,80,85,90,95,100 
dc.w 56,76,64,45,67,98,65,54,76,86 

dc.w 55,60,65,70,75,80,85,90,95,100 
dc.w 56,76,64,45,67,98,65,54,76,86 

dc.w 55,60,65,70,75,80,85,90,95,100 
dc.w 56,76,64,45,67,98,65,54,76,86 

dc.w 55,60,65,70,75,80,85,90,95,100 
dc.w 56,76,64,45,67,98,65,54,76,86 

blk.b 12240,0 
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3.6.4. ANREGUNGEN 

Zum Abschluß dieses Buches soll Ihnen dieses Kapitel weitere 
Anregungen zum Thema Spieleprogrammierungen, speziell zu un¬ 
seren Beispielprogrammen, geben. Auf den folgenden Seiten 
sind einige Vorschläge zur Verbesserung, beziehungsweise zur 
Erweiterung der Programme aufgeführt. Mit den bis jetzt er¬ 
worbenen Kenntnissen, müßten Sie in der Lage sein, die fol¬ 
genden Änderungen vorzunehmen. 


1) Zwei- oder Drei-Spielermodus 

Unser kleines Spiel ist nur für einen Spieler, der gegen den 
Computer antritt, ausgelegt. Sie können nun einen zweiten 
Spieler mit einem in Port 0 angeschlossenen Joystick pro¬ 
grammieren. Dazu müssen Sie lediglich die Routinen für die 
Joystick-Abfrage von Port 1 kopieren und auf Port 0 umän¬ 
dern, indem Sie das Register $dff00a verwenden. 

Sogar ein dritter Spieler könnte in das Spielgeschehen ein¬ 
greif en, wenn Sie seine Bewegungen über die Tastatur einie¬ 
sen. Außerdem könnte man den Spieler selbst wählen lassen, 
mit welchen Tasten er sein Symbol lenken möchte, indem man 
ihn zu Beginn die Tasten selbst definieren läßt. 

Spielen mehrere Personen gleichzeitig, so müssen natürlich 
auch die Kollisionen darauf eingerichtet werden. 


2) Sternenhimmel Titelbild 

Das Beispiel-Listing Sternenhimmel steht mit unserem Spiel 
nicht in Zusammenhang. Man könnte sich diesen netten Effekt 
aber als Titelvorspann zunutze machen. Nachdem man das Spiel 
gestartet hat, erscheint nicht gleich das Spielfeld, sondern 
ein schwarzer Bildschirm aus dessen Tiefe Sterne erscheinen. 
Außerdem könnte man den Titel in den Hintergrund einblenden. 
Um das zu erreichen, müssen Sie eine zweite Copperliste an- 
legen. Die Copperliste, die zum Hauptprogramm gehört, wird 
erst nach dem Druck und durch den Joystick aktiviert, da¬ 
durch schaltet der Computer zwischen Sternen und Spiel um. 
Wenn man die Sterne ebenfalls im Dual-Playfield-Modus pro¬ 
grammiert, könnte man im zweiten Playfield den Titel des 
Spieles einblenden. Im Dual-Playfield-Modus kann man maximal 
3 Bitplanes verwenden, das entspricht 8 Farben. 
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3) Attached Sprites 

Da wir nur vier Sprites für unser Spiel verwenden, ist der 
Einsatz von Attached Sprites für alle vier Symbole möglich. 
Beachten müssen Sie allerdings, daß auch die Bits für die 
ungeraden Sprites bei der Kollision gesetzt werden müssen, 
damit diese überhaupt zugelassen werden (Register $dff098). 


4) Soundeffekte 

Im Kapitel Sound-Programmierung wurde die Anwendung und das 
Abspielen von Samples besprochen. Während Ablauf des Pro¬ 
gramms ertönt ein Sample als Hintergrund-Musik. Zur Steige¬ 
rung, können Sie mit einem Soundsampler mehrere Klänge und 
Geräusche samplen und z.B. während einer Kollision abspie¬ 
len. Ein netter Effekt ist auch eine gesampelte Stimme, die 
bei einer Kollision gespielt wird. 


4) Blitter-Einsatz 

Im Spiel wird der Blitter nicht verwendet, da keine großen 
Datenmengen kopiert werden müssen. Ein kleines Datenfeld 
wird allerdings kopiert, nämlich das Datenfeld, in dem die 
Zahl der Leben steht. Diese Aufgabe wird noch vom Prozessor 
übernommen. Im Beispielprogramm des Kapitels "Einfache Blit- 
teroperationen" wird dieser Vorgang mit dem Blitter demon¬ 
striert. Ersetzen Sie diese Routinen auch im Spiel! 
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Im Anhang finden Sie eine, für Hardware-Programmierer uner¬ 
läßliche Übersicht über alle Hardware-Register des Amiga. 
Außerdem ist an dieser Stelle das fertige Spiele-Listing, 
sowie ein Stichwort- und Literaturverzeichnis aufgeführt. 
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1. ÜBERSICHT DER HARDWARE-REGISTER 


Am wichtigsten für Spiele-Programmierer sind die Hardware- 
Register. In diesem Kapitel finden Sie eine Auflistung aller 
Hardware-Register des Amiga. 


NAME 

ADRESSE 

FUNKTION 

BLTDDAT 

SdffOOO 

Blitter Destination Data 

DMACONR 

$dff002 

DMA Control Read 

VPOSR 

$dff004 

Vertical Position Read 

VHPOSR 

$dff006 

Vert. and horiz. Position Read 

DSKDATR 

$dff008 

Disk data read 

JOYODAT 

$dff00a 

Joy-Port 0 data 

JOY1DAT 

$dff00c 

Joy-Port 1 data 

CLXDAT 

$dff00e 

Collision data 

ADKCONR 

SdffOlO 

Audio Disk Control Read 

POTODAT 

$dff012 

PotO Dat a 

POTIDAT 

$dff014 

Poti Dat a 

POTGOR 

$dff016 

Pot data read 

SERDATR 

$dff018 

Serial data read 

DSKBYTR 

$dff01a 

Disk data byte read 

INTENAR 

SdffOlc 

Interrupt enable bits read 

INTREQR 

$dffOie 

Interrupt request bits read 

DSKPTH 

$dff020 

Disk pointer high 

DSKPTL 

$dff022 

Disk pointer low 

DSKLEN 

$dff024 

Disk data length 

DSKDAT 

$dff026 

Disk DMA data write 

REFPTR 

$dff028 

Refresh pointer 

VPOSW 

$dff02a 

Vertical Position write 

VHPOSW 

$dff02c 

Vert. and horiz. Pos. write 

COPCON 

$dff02e 

Coprozessor control register 

SERDAT 

$dff030 

Serial port data 

SERPER 

$dff032 

Serial port period 

POTGO 

$dff034 

Pot port data write and go 

JOYTEST 

$dff036 

Joy port Test 

STREQU 

$dff038 

Strobe for horiz. sync with VB 
and EQU 

STRVBL 

$dff03a 

Strobe for horiz. sync with VB 

STRHOR 

$dff03c 

Strobe for horiz. sync 

STRLONG 

$dff03e 

Strobe for identification of 
long horiz. line 
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BLTCONO 

$dff040 

Blitter control register 0 

BLTCON1 

$dff042 

Blitter control register 1 

BLTAFWM 

$dff044 

Blitter first word mask for A 

BLTALWM 

$dff046 

Blitter last word mask for A 

BLTCPTH 

$dff048 

Blitter pointer high to C 

BLTCPTL 

$dff04a 

Blitter pointer low to C 

BLTBPTH 

$dff04c 

Blitter pointer high to B 

BLTBPTL 

$dff04e 

Blitter pointer low to B 

BLTAPTH 

$dff050 

Blitter pointer high to A 

BLTAPTL 

$dff052 

Blitter pointer low to A 

BLTDPTH 

$dff054 

Blitter pointer high to D 

BLTDPTL 

$dff056 

Blitter pointer low to D 

BLTSIZE 

$dff058 

Blitter size and start 


$dff05a 

nicht belegt 


$dff05c 

nicht belegt 


$dff05e 

nicht belegt 

BLTCMOD 

$dff060 

Blitter modulo C 

BLTBMOD 

$dff062 

Blitter modulo B 

BLTAMOD 

$dff064 

Blitter modulo A 

BLTDMOD 

$dff066 

Blitter modulo D 


$dff068 

nicht belegt 


$dff06a 

nicht belegt 


$dff06c 

nicht belegt 


$dff06e 

nicht belegt 

BLTCDAT 

$dff070 

Blitter C data register 

BLTBDAT 

$dff072 

Blitter B data register 

BLTADAT 

$dff074 

Blitter A data register 


$dff076 

nicht belegt 


$dff078 

nicht belegt 


$dff07a 

nicht belegt 


$dff07c 

nicht belegt 

DSKSYNC 

$dff07e 

Disk Synchronisation pattern 

COP1LCH 

$dff080 

Copper first location high 

COP1LCL 

$dff082 

Copper first location low 

COP2LCH 

$dff084 

Copper second location high 

COP2LCL 

$dff086 

Copper second location low 

COPJMP1 

$dff088 

Restart Copper first location 

COPJMP2 

$dff08a 

Restart Copper sec. location 

COPINS 

$dff08c 

Copper instruction fetch 

DIWSTRT 

$dff08e 

Display window start 

DIWSTOP 

$dff090 

Display window stop 

DDFSTRT 

$dff092 

Display data fetch start 

DDFSTOP 

$dff094 

Display data fetch stop 

DMACON 

$dff096 

DMA control register 
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CLXCON $dff098 

INTENA $dff09a 

INTREQ $dff09c 

ADKCON $dff09e 

AUDOLCH $dffOaO 

AUDOLCL $dff0a2 

AUDOLEN $dff0a4 

AUDOPER $dff0a6 

AUDOVOL $dff0a8 

AUDODAT $dffOaa 

SdffOac 
$dffOae 
AUD1LCH $dffObO 

AUD1LCL $dff0b2 

AUDILEN $dff0b4 

AUDIPER $dff0b6 

AUD1V0L $dff0b8 

AUDIDAT SdffOba 

$dffObe 
$dffObe 
AUD2LCH SdffOcO 

AUD2LCL $dff0c2 

AUD2LEN $dff0c4 

AUD2PER $dff0c6 

AUD2VOL $dff0c8 

AUD2DAT $dffOca 

$dffOcc 
$dffOce 
AUD3LCH SdffOdO 

AUD3LCL $dff0d2 

AUD3LEN $dff0d4 

AUD3PER $dff0d6 

AUD3V0L $dff0d8 

AUD3DAT $dffOda 

SdffOdc 
$dffOde 
BPL1PTH SdffOeO 

BPL1PTL $dff0e2 

BPL2PTH $dff0e4 

BPL2PTL $dff0e6 

BPL3PTH $dff0e8 

BPL3PTL $dffOea 

BPL4PTH SdffOec 

BPL4PTL $dffOee 

BPL5PTH SdffOfO 


Collision control 
Interrupt enable bits 
Interrupt request bits 
Audio and disk control 
AudioO location high 
AudioO location low 
AudioO data length 
AudioO period 
AudioO volume 
AudioO data register 
nicht belegt 
nicht belegt 
Audiol location high 
Audiol location low 
Audiol data length 
Audiol period 
Audiol volume 
Audiol data register 
nicht belegt 
nicht belegt 
Audio2 location high 
Audio2 location low 
Audio2 data length 
Audio2 period 
Audio2 volume 
Audio2 data register 
nicht belegt 
nicht belegt 
Audio3 location high 
Audio3 location low 
Audio3 data length 
Audio3 period 
Audio3 volume 
Audio3 data register 
nicht belegt 
nicht belegt 
Bitplanei pointer high 
Bitplanel pointer low 
Bitplane2 pointer high 
Bitplane2 pointer low 
Bitplane3 pointer high 
Bitplane3 pointer low 
Bitplane4 pointer high 
Bitplane4 pointer low 
Bitplane5 pointer high 
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BPL5PTL 

$dffof2 

Bitplanes pointer low 


BPL6PTH 

$dff0f4 

Bitplane6 pointer high 


BPL6PTL 

$dff0f6 

Bitplane6 pointer low 



$dffOf8 

nicht belegt 



$dffOfa 

nicht belegt 



SdffOfc 

nicht belegt 



$dffOfe 

nicht belegt 


BPLCONO 

$dff100 

Bitplane control register 

0 

BPLCON1 

$dff102 

Bitplane control register 

1 

BPLCON2 

$dff104 

Bitplane control register 

2 


$dffl06 

nicht belegt 


BPLIMOD 

$dffl08 

Bitplane Modulo 1 


BPL2MOD 

$dff10a 

Bitplane Modulo 2 



SdfflOc 

nicht belegt 



$dfflOe 

nicht belegt 


BPLIDAT 

$dff110 

Bitplanel data 


BPL2DAT 

$dff112 

Bitplane2 data 


BPL3DAT 

$dff114 

Bitplane3 data 


BPL4DAT 

$dff116 

Bitplane4 data 


BPL5DAT 

$dff118 

BitplaneS data 


BPL6DAT 

Sdfflla 

Bitplane6 data 



$dff11c 

nicht belegt 



$dffIle 

nicht belegt 


SPROPTH 

$dffl20 

SpriteO pointer high 


SPROPTL 

$dff122 

SpriteO pointer low 


SPR1PTH 

$df f 124 

Spritei pointer high 


SPR1PTL 

$dff126 

Spritei pointer low 


SPR2PTH 

$dff128 

Sprite2 pointer high 


SPR2PTL 

$dff12a 

Sprite2 pointer low 


SPR3PTH 

$dff12c 

Sprite3 pointer high 


SPR3PTL 

$dff12e 

Sprite3 pointer low 


SPR4PTH 

$dffl30 

Sprite4 pointer high 


SPR4PTL 

$dff132 

Sprite4 pointer low 


SPR5PTH 

$dff134 

Sprite5 pointer high 


SPR5PTL 

$dff136 

Sprites pointer low 


SPR6PTH 

$dff138 

Sprite6 pointer high 


SPR6PTL 

$dff13a 

Sprite6 pointer low 


SPR7PTH 

$dff13c 

Sprite7 pointer high 


SPR7PTL 

$dff13e 

Sprite7 pointer low 


SPROPOS 

$dffl40 

SpriteO start Position 


SPROCTL 

$dff142 

SpriteO control data 


SPRODATA 

$df f 144 

SpriteO image data A 


SPRODATB 

$dff146 

SpriteO image data B 


SPR1POS 

$df f 148 

Spritei start Position 
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SPR1CTL $dff14a 
SPR1DATA $dff14c 
SPR1DATB $dff14e 
SPR2P0S $dff150 
SPR2CTL $dff152 
SPR2DATA $dff154 
SPR2DATB $dff156 
SPR3POS $dff158 
SPR3CTL $dff15a 
SPR3DATA $dff15c 
SPR3DATB $dff15e 
SPR4POS $dff160 
SPR4CTL $dff162 
SPR4DATA $dff164 
SPR4DATB $dff166 
SPR5POS $dff168 
SPR5CTL $dff16a 
SPR5DATA $dff16c 
SPR5DATB $dff16e 
SPR6POS $dff170 
SPR6CTL $dff172 
SPR6DATA $dff174 
SPR6DATB $dff176 
SPR7POS $dff178 
SPR7CTL $dff17a 
SPR7DATA $dff17c 
SPR7DATB $dff17e 
COLOROO $dff180 
COLOROl $dff182 
COLOR02 $dff184 
COLOR03 $dff186 
COLOR04 $dff188 
COLOR05 $dff18a 
COLOR06 $dff18c 
COLOR07 $dff18e 
COLOR08 $dff190 
COLOR09 $dff192 
COLORIO $dff194 
COLOR11 $dff196 
COLOR12 $dff198 
COLOR13 $dff19a 
COLOR14 $dff19c 


Spritei control data 
Spritei image data A 
Spritei image data B 
Sprite2 start position 
Sprite2 control data 
Sprite2 image data A 
Sprite2 image data B 
Sprite3 start position 
Sprite3 control data 
Sprite3 image data A 
Sprite3 image data B 
Sprite4 start position 
Sprite4 control data 
Sprite4 image data A 
Sprite4 image data B 
Sprites start position 
Sprite5 control data 
Sprite5 image data A 
Sprite5 image data B 
Sprite6 start position 
Sprite6 control data 
Sprite6 image data A 
Sprite6 image data B 
Sprite7 start position 
Sprite7 control data 
Sprite7 image data A 
Sprite7 image data B 
Color register 00 
Color register 01 
Color register 02 
Color register 03 
Color register 04 
Color register 05 
Color register 06 
Color register 07 
Color register 08 
Color register 09 
Color register 10 
Color register 11 
Color register 12 
Color register 13 
Color register 14 
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C0L0R15 

$dff19e 

Color 

register 

15 

C0L0R16 

$dfflaO 

Color 

register 

16 

C0L0R17 

$dffla2 

Color 

register 

17 

C0L0R18 

$dffla4 

Color 

register 

18 

C0L0R19 

$dffla6 

Color 

register 

19 

COLOR20 

$dffla8 

Color 

register 

20 

C0L0R21 

$dfflaa 

Color 

register 

21 

COLOR22 

$dfflac 

Color 

register 

22 

COLOR23 

$dfflae 

Color 

register 

23 

COLOR24 

SdfflbO 

Color 

register 

24 

COLOR25 

$dfflb2 

Color 

register 

25 

COLOR26 

$dfflb4 

Color 

register 

26 

COLOR27 

$dfflb6 

Color 

register 

27 

COLOR28 

$dfflb8 

Color 

register 

28 

COLOR29 

Sdfflba 

Color 

register 

29 

COLOR30 

Sdfflbc 

Color 

register 

30 

C0L0R31 

$dfflbe 

Color 

register 

31 
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2. DAS KOMPLETTE SPIELE-LISTING 


Zusammenfassend finden Sie hier das Listing für unser klei¬ 
nes Geschicklichkeits-Spiel. Das Programm wurde auf einem 
Seka-Assembler geschrieben, ist aber zu anderen Assemblern 
kompatibel. Evtl, müssen einige Befehle oder Adressie- 
runggsarten verändert werden. 

Das gesamte Spiel finden Sie natürlich auch auf der mitge¬ 
lieferten Diskette, sowohl als Source-Listing wie auch als 
ausführbares Object-File. Ebenso sind alle notwendigen Gra¬ 
fik- und Musik-Daten auf der Programmdiskette enthalten. 


; %%%%%%%%%%%%%%%%%%%%%% 

; %% THE GAME %% 

; %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 

; %% Program, sound and graphics written %% 

/ %% by Niki Laber %% 

; %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 

7 

s: bsr opening ;Alles öffnen 

bsr initcopper ;Copperliste erstellen 

bsr initmusic ;Musik initialisieren 

7 

restart: move.1 #pic3+364,powercount 

clr.b end 
clr.b fin 
clr.b animcount 
clr.b frage 
move.l #-2,kreuzptr 
bsr clr 
move.b #3,life 

bsr drawpower ;Energiebalken zeichnen 

bsr drawlife ;"Leben" zeichnen 
bsr clrsprites ;Sprites löschen 
bsr initsprites ;Sprites kopieren 
move #$f77,aal+2 
move #$733,aa3+2 

warten: bsr coloris /Farben 

bsr wait ;Warteschleife 
move $dff00e,d5 

btst #7,$bfe001 /warte auf Joy-button 

bne.s warten /gedrückt? 

move.1 #$a08cb000,spritebufferl 
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move #$c55,aal+2 
move #$c55,aa2+2 
move #$c55,aa3+2 


; Hauptschleife 


loop: 

move.1 

$dff004,d0 ;Warten auf Rasterzeile 


and. 1 

#$fff00,d0 


cmp. 1 

#$00003000,dO 


bne.s 

loop 


bsr 

joy ;Joystick Abfrage 


bsr 

scrolling_kl ;Scrolling kleine Plane 


bsr 

scrolling_gr ;Scrolling große Plane 


bsr 

collision ;Kollisions-check 


bsr 

scrollcopper ;3D-Rolle 


bsr 

moveenemy ;Feind bewegen 


bsr 

movel ;Symbol 1 bewegen 


bsr 

move2 ;Symbol 2 bewegen 


bsr 

color /Farben 


bsr .L 

spriteanim /Sprites animieren 


cmp.b 

#1,fin 


bne.s 

mouse 


cmp.b 

#3,annis 


beq.s 

nextlife 

mouse: 

btst 

#6,$bfe001 /Maustaste gedrückt? 


bne.s 

loop /ja? 

r 

; Programmende 

r 

ende: 

move 

#$0003,$dff096 /Sound abschalten 


move 

#$c000,$dff09a /Copper zurückschreiben 

e: 

rts 

/Programmende 


/ 

; Unterroutinen 
/ 
r 

opening: move.w 

move.1 


ren 


#$4000,$dff09a ;Interrupts sperren 
#copperl,$dff084;Copperliste aktivie- 


move #%0000000001000001,$dff098 

Kollision ein 

move.l #picl,d0 ;Playfield 1 

move d0,pll+6 

swap dO 

move dO,pll+2 

move.l #picl+grl,d0 

move dO,pl2+6 
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swap dO 

move d0,pl2+2 

move.l #picl+[grl*2],d0 

move dO,pl3+6 

swap dO 

move dO,pl3+2 

move.l #pic2,d0 ;Playfield 2 

move d0,plll+6 

swap dO 

move dO,plll+2 

move.l #pic2+gr2,d0 

move d0,pl22+6 

swap dO 

move dO,pl22+2 

move.l #pic2+[gr2*2],d0 

move d0,pl33+6 

swap dO 

move dO,pl33+2 

move.l #pic3,d0 /Anzeigetafel 

move d0,pllll+6 

swap dO 

move d0,pllll+2 

move.l #pic3+gr3,d0 

move dO,pllll-H4 

swap dO 

move d0,pllll+10 
move.l #pic3+[gr3*2],d0 
move dO,pllll+22 
swap dO 

move d0,pllll+18 
move.l #pic3+[gr3*3],d0 
move dO,pllll+30 
swap dO 

move dO,pllll+26 
move.l #pic3+[gr3*4],d0 
move dO,pllll+38 
swap dO 

move d0,pllll+34 

move.l #spritebufferl,d0 /Sprites 

move dO,pl+6 

swap dO 

move d0,pl+2 

move.1 #sprite3,dO 

move dO,p2+6 

swap dO 
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move 

dO,p2+2 


move.1 

#sprite4,d0 


move 

dO,p3+6 


swap 

dO 


move 

dO,p3+2 


move.1 

#sprite5,d0 


move 

d0,p4+6 


swap 

dO 


move 

dO,p4+2 


rts 


/ 

nextlife: 

cmp.b 

#1,end 


beq.L 

restart 


clr .b 

fin 


clr .b 

frage 


clr .b 

animcount 


move 

$dff00e,d5 


move.1 

#pic3+364,powercount 


bsr 

drawpower 


bsr 

initsprites 


move.1 

#$a08cb000,spritebufferl 


move 

#$c55,aal+2 


move 

#$c55,aa2+2 


move 

#$c55,aa3+2 


bra.L 

loop 

/ 

initcopper: 

lea 

cins(pc) / a0 ;Copperliste erstellen 


move.1 

#29,d0 


move. w 

#$c001,dl 

copycop: 

move.w 

dl,(a0)+ 


move. w 

#$fffe,(a0)+ 


move.w 

#$0180,(a0)+ 


move.w 

#$0000,(a0)+ 


add.w 

#$0100,dl 


dbra 

dO,copycop 


rts 


} 

spriteanim: 

add.b 

#1,animcount ;Sprite Animationen 


cmp.b 

#10,animcount 


beq.s 

firstanim 


cmp.b 

#20,animcount 


beq.s 

secondanim 


cmp.b 

#30,animcount 


beq.s 

thirdanim 


cmp.b 

#40,animcount 


beq 

rts 

fourthanim 

firstanim: 

lea 

sei,al 
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lea 

seO,aO 


bsr 

ani 


lea 

sml,al 


lea 

smO,a0 


bsr 

ani 


lea 

snl ,al 


lea 

snO,aO 


bsr 

ani 


lea 

sbl,al 


bra 

anim 

secondanim: 

lea 

se2,al 


lea 

seO,aO 


bsr 

ani 


lea 

sm2,al 


lea 

smO,aO 


bsr 

ani 


lea 

sn2,al 


lea 

snO,aO 


bsr. s 

ani 


lea 

sb2,al 


bra.s 

anim 

thirdanim: 

lea 

se3,al 


lea 

seO,aO 


bsr .s 

ani 


lea 

sm3,al 


lea 

smO,aO 


bsr .s 

ani 


lea 

sn3,al 


lea 

snO,aO 


bsr .s 

ani 


lea 

sb3,al 


bra.s 

anim 

fourthanim: 

clr .b 

animcount 


add.b 

#1,annis 


lea 

se2,al 


lea 

seO,a0 


bsr .s 

ani 


lea 

sm2,al 


lea 

smO,aO 


bsr .s 

ani 


lea 

sn2,al 


lea 

snO,a0 


bsr .s 

ani 


lea 

sb2,al 

anim: 

lea 

sbo,a0 

ani: 

move 

#15,d0 

copyanim: 

move. 1 

(al)+,(a0)+ 


dbf 

do,copyanim 
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rts 


/ 

wait: 

move 

#$5000,d0 ;Warteschleife 

waiting: 

dbf 

dO,waiting 


rts 


/ 

collision: 

cmp.b 

#$01,fin /Kollisionsabfrage 


beq.s 

nocolly 


move 

$dff00e,d5 


btst 

#5,d5 


beq 

coli 


btst 

#l,d5 


beq 

coli 


btst 

#9 , d5 


bne 

explusion 


btst 

#10,d5 


bne 

contactl 


btst 

#ll/d5 


bne 

contact2 

nocolly: 

rts 


contactl: 

move.b 

#1,frage ;Kollision mit grünem 


move 

#$00fc,sprrO+6 ;Sprite 


move 

#$00ca,sprr0+10 


move 

rts 

#$00a8,sprr0+14 

contact2: 

cmp.b 

#1,frage ;Kollision mit gelbem 


bne.s 

nocontact ;Sprite 


move 

#$0f0c,sprrO+6 


move 

#$0c0a,sprr0+10 


move 

#$0a08,sprr0+14 


add.l 

#2,kreuzptr 


clr .b 

frage 


cmp. 1 

#18,kreuzptr 


bne.s 

contdraw 


move 

#$00f0,sieger+2 


move.b 

#1,fin 


move.b 

#1,end 


move.b 
rts 

#2,annis 

contdraw: 

bsr 

drawfinis 

nocontact: 

rts 


coli: 

add.b 

#1,counter ;Keine Kollision mit 


cmp.b 

#10,counter ;Bitplane 


bne.s 

nosubtr 


clr .b 

counter 


move.1 

powercount,a0 


clr .b 

(a0) 


cmp.l 

#pic 3+1364,powercount 
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beq. s 

explusion 


add.l 

#40,powercount 

nosubtr: 

rts 


7 

explusion: 

move.b 

#l,fin ;Explusion 


clr .b 

annis 


sub.b 

#1,life 


cmp.b 

#0,life 


bne.s 

da 


move.b 

#1,end 

da: 

cmp.b 

#2,life 


bne.s 

dal 


lea 

life2,al 


bsr 

makelife 

dal: 

cmp.b 

#1 ,life 


bne.s 

da 2 


lea 

lifel,al 


bsr 

makelife 

da2: 

lea 

sbl(pc),a0 


lea 

ssl(pc),al 


move 

#$0f60,sprr0+6 


move 

#$0e40,sprr0+10 


move 

#$0c00,sprrO+14 

spritecopyl: 

move 

#47,d0 

copysprl: 

move.1 

(al)+, (a0)+ 


dbf 

dO,copysprl 


rts 


7 

clrsprites: 

clr. 1 

spritebufferl ;Sprites löschen 


clr. 1 

sprite2 


clr .1 

sprite3 


clr .1 

sprite4 


clr .1 

spriteS 


rts 


7 

initsprites: 

lea 

sbl(pc),a0 ;Sprites kopieren 


lea 

sei(pc) ,al 


bsr .s 

spritecopyl 


move 

#$0f0c,sprr0+6 


move 

#$0c0a,sprr0+10 


move 

#$0a08,sprr0+14 


lea 

sbl(pc),a0 


lea 

sl(pc),al 


bra.s 

spritecopyl 

7 

moveenemy: 

move.b 

I5,d4 ;Rotes Sprite bewegen 


move.b 

16,d5 


add.b 

d4,l3 
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labeil: 


label2: 


movel: 


labelll: 


labell2: 


/ 

move2: 


labellll: 


subq.b #1,11 
bne.s labell 
move.b #151,11 
eor.b #$fe,d4 
move.b I3,sprite3+1 
add.b d5,l4 
subq.b #1,12 
bne.s label2 
move.b #194,12 
eor.b #$fe,d5 
move.b I4,sprite3 
move.b 14,d6 
add.b #$10,d6 
move.b d6,sprite3+2 
move.b d4,l5 
move.b d5,l6 
rts 

move.b Il5,d4 ;Grünes Sprite bewegen 

move.b 116,d5 

add.b d4,113 

subq.b #2,111 

bne.s labelll 

move.b #151,111 

eor.b #$fe,d4 

move.b 113,sprite4+l 

add.b d5,ll4 

subq.b #1,112 

bne.s labell2 

move.b #194,112 

eor.b #$fe,d5 

move.b 114,sprite4 

move.b 114,d6 

add.b #$10,d6 

move.b d6,sprite4+2 

move.b d4,ll5 

move.b d5,ll6 

rts 

move.b 1115,d4 ;Gelbes Sprite bewegen 

move.b 1116,d5 

add.b d4,1113 

subq.b #3,1111 

bne.s labellll 

move.b #151,1111 

eor.b #$fe,d4 

move.b 1113,sprite5+l 

add.b d5,1114 


184 



ANHANG 


labelll2: 


scrolling 


rauf: 


subq.b #2,1112 
bne.s labelll2 
move.b #194,1112 
eor.b #$fe,d5 
move.b 1114,sprite5 
move.b 1114,d6 
add.b #$10,d6 
move.b d6,sprite5+2 
move.b d4,lll5 
move.b d5,lll6 
rts 


kl: tst.b 
beq. s 
lea 
move 
swap 
move 
add.l 
move 
swap 
move 


kennbytel ;Scrolling des kleinen 

rauf ;Playfields 

pll+2(pc),al ;(Hintergrund) 

(al),d0 
dO 

4(al),d0 
#40,dO 
dO,4(al) 
dO 

dO,(al) 


lea pl2+2(pc),al 
move (al),d0 
swap dO 
move 4(al),d0 
add.l #40,dO 
move d0,4(al) 
swap dO 
move d0,(al) 


lea pl3+2(pc),al 
move (al),d0 
swap dO 
move 4(al),d0 
add.l #40,dO 
move d0,4(al) 
swap dO 
move d0,(al) 
add #l,countl 
cmp #145,countl 
bne.s noscroll 
clr.b kennbytel 
add #l,countl 
lea pll+2(pc),al 
move (al),d0 
swap dO 
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move 

4(al),d0 


sub.l 

#40,dO 


move 

d0,4(al) 


swap 

dO 


move 

dO, (al) 


lea 

pl2+2(pc),al 


move 

(al),d0 


swap 

dO 


move 

4(al),d0 


sub.l 

#40,dO 


move 

d0,4(al) 


swap 

dO 


move 

dO,(al) 


lea 

pl3+2(pc),al 


move 

(al),d0 


swap 

dO 


move 

4(al),d0 


sub.l 

#40,do 


move 

d0,4(al) 


swap 

do 


move 

do,(al) 


cmp 

#290,countl 


bne.s 

noscroll 


clr 

countl 


move.b 

#$01,kennbytel 

noscroll: 

rts 


/ 

scrolling_gr: 

tst .b 

kennbyte2 ;Scrolling des großen 


beq.s 

rauf2 ;Playfields 


lea 

plll+2(pc),al ;(Vordergrund) 


move 

(al),d0 


swap 

dO 


move 

4(al),d0 


add.l 

# 80 ,do 


move 

d0,4(al) 


swap 

dO 


move 

dO,(al) 


lea 

pl22+2(pc),al 


move 

(al),d0 


swap 

dO 


move 

4(al),d0 


add.l 

#80,dO 


move 

d0,4(al) 


swap 

dO 


move 

dO,(al) 


186 



ANHANG 


rauf2: 


noscroll2: 

) 

scrollcopper: 


lea pl33+2(pc),al 

move (al),dO 
swap dO 
move 4(al),d0 
add.l #80,dO 
move d0,4(al) 
swap dO 
move d0,(al) 
add #1,count2 
cmp #173,count2 
bne.s noscroll2 
clr.b kennbyte2 
add #1,count2 
lea plll+2(pc),al 

move (al),d0 
swap dO 
move 4(al),d0 
sub.l #80,d0 
move d0,4(al) 
swap dO 
move d0,(al) 

lea pl22+2(pc),al 

move (al),d0 
swap dO 
move 4(al),d0 
sub.l #80,dO 
move d0,4(al) 
swap dO 
move dO,(al) 

lea pl33+2(pc),al 

move (al),d0 
swap dO 
move 4(al),d0 
sub.l #80,dO 
move d0,4(al) 
swap dO 
move d0,(al) 
cmp #346,count2 
bne.s noscroll2 
clr count2 
move.b #$01,kennbyte2 
rts 

lea cins(pc),a0 ;3D-Rolle drehen und 
move.l parptr,a4 /bewegen 
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tres: 

qwex: 

ewewx: 

iix: 

werwerx: 

trex: 

/ 

joy: 


j oyout: 


cmp.w #$ffff,(a4) 
bne.s tres 

move.l #parabel,parptr 

move.l parptr(pc),a4 

move.l shadeptr(pc),a3 

cmp.w #$ffff,(a3) 

bne.s qwex 

move.1 Ishade,shadeptr 

move.l shadeptr(pc),a3 

move.l colorptr(pc),a2 

cmp.w #$ffff,(a2) 

bne.s ewewx 

move.l #colors,colorptr 

move.l colorptr(pc),a2 

move #29,dO 

move.w (a4),d5 

move d5,(a0) 

add #$0100,d5 

add.l #6,a0 

move (a2)+,d7 

move (a3)+,d6 

and.w d6,d7 

move d7,(a0) 

cmp.w #$ffff,(a2) 

bne.s werwerx 

lea colors(pc),a2 

cmp.w #$ffff,(a3) 

bne.s trex 

lea shade(pc),a3 

add.l #2,a0 

dbra d0,iix 

add.l #2,colorptr 

add.l #2,parptr 

rts 

cmp.b #$01,fin /Joystickabfrage 

beq.s j oyout 

clr $dff036 

move $dff00c,dl 

cmp #$0300,dl 

beq.s links 

cmp.b #$03,dl 

beq.s rechts 

cmp #$0100,dl 

beq.s oben 

cmp.b #$01,dl 

beq.s unten 

rts 


188 



ANHANG 


links: 

move.1 

spritebufferl,d0 


swap 

dO 


cmp.b 

#$40,d0 


bls.s 

j oyout 


sub 

rts 

#$0001,spritebufferl 

rechts: 

move.1 

spritebufferl,d0 


swap 

dO 


cmp.b 

#$d8,d0 


bhs.s 

j oyout 


add 

rts 

#$0001,spritebufferl 

oben: 

move.1 

spritebufferl,d0 


swap 

dO 


clr .b 

dO 


cmp 

#$3000,dO 


bls.s 

j oyout 


sub.l 

rts 

#$01000100,spritebufferl 

unten: 

move.1 

spritebufferl,d0 


swap 

dO 


clr .b 

dO 


cmp 

#$ef00,d0 


bhs.s 

j oyout 


add. 1 

#$01000100,spritebufferl 


rts 


r 

initmusic: 

move.1 

#music,$dffOaO ;Musik initialisieren 


move 

#$9234,$dff0a4 ;und einschalten 


move 

#200,$dff0a6 


move 

#$40,$dff0a8 


move.1 

#music,$dffObO 


move 

#$9234,$dff0b4 


move 

#200,$dff0b6 


move 

#$40,$dff0b8 


move 

#$8003,$dff096 


rts 


/ 

drawlife: 

lea 

life3,al ;restliche "Leben" 

makelife: 

lea 

pic3+370,a2 /kopieren 


move 

#4,dl 

planecopyl: 

move.1 

a2 ,a0 


move 

#24,dO 

lifecopyl: 

move. 1 

(al)+,(a0) 


add.l 

#40,aO 


dbf 

dO,lifecopyl 


add.l 

#gr3,a2 


dbf 

dl,planecopyl 
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rts 



/ 

drawfinis: 

lea 

pic3+456+[gr3*3],a0 ;Kreuze 

zeichnen 


add.l 

kreuzptr,a0 



move. b 

#%11000001,(a0) 



move.b 

#%01100011,40(a0) 



move. b 

#%00110110,80(a0) 



move. b 

#%00011100,120(a0) 



move.b 

#%00011100,160(a0) 



move. b 

#%00110110,200(a0) 



move. b 

#%01100011,240(a0) 



move. b 

#%11000001,280(a0) 



rts 



/ 

clr: 

lea 

pic3+456+[gr3*3],a0 ;Kreuze 

löschen 


move. 1 

#8 ,d0 



lea 

pic3+456+[gr3*3],a0 


kreuzen: 

bsr .s 

kreuz 



add.l 

#2 ,a0 



dbf 

dO,kreuzen 



rts 



kreuz: 

clr ,b 

(a0) 



clr .b 

40(a0) 



clr .b 

80(a0) 



clr .b 

120 (a0) 



clr .b 

160(a0) 



clr .b 

200 (a0) 



clr .b 

240(a0) 



clr .b 

280(a0) 



rts 



/ 

drawpower: 

move. 1 

powercount,a0 /Energie zeichnen 


move 

#24,dO 


draw: 

move. b 

#$ff,(aO) 



add.l 

#40,aO 



dbf 

d0,draw 



rts 



/ 

color: 

lea 

sprrl+10,a0 /Rotes Sprite 



move. 1 

colptr,al /"blinken” lassen 



cmp 

#$ffff,(al) 



bne.s 

dahier 



move. 1 

#colo,colptr 



move. 1 

colptr,al 


dahier: 

move 

(al),(aO) 



add.l 

#2,colptr 



rts 
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coloris: lea aa2+2,a0 ;Schrift 

move.l colptr2,al ;"blinken” lassen 
cmp #$ffff,(al) 
bne.s dahieris 
move.1 #colo2,colptr2 
move.l colptr2,al 
dahieris: move (al),(aO) 

add.l #2,colptr2 
rts 


Definitionen 


animcount: 
kennbytel: 
kennbyte2: 
11 : 

12 : 

13: 

14: 

15: 

16 : 

111 : 

112 : 

113: 

114: 

115: 

116 : 

1111 : 

1112 : 

1113: 

1114: 

1115: 

1116 : 
counter: 
fin: 
annis: 
life: 
frage: 
end: 
countl: 
count2: 
kreuzptr: 


dc.b 0 
de .b 1 
dc.b 1 
dc.b 151 
dc.b 194 
dc.b 64 
dc.b 44 
dc.b 1 
dc.b 1 
dc.b 151 
dc.b 194 
dc.b 54 
dc.b 34 
dc.b 1 
dc.b 1 
dc.b 151 
dc.b 194 
dc.b 54 
dc.b 34 
dc.b 1 
dc.b 1 
dc.b 0 
dc.b 0 
dc.b 0 
dc.b 3 
dc.b 0 
dc.b 0,0 
dc.w 0 
dc.w 0 
dc.l 0 


powercount:de.1 0 


/ 

colptr: dc.l colo 

colo: dc.w $0f00,$0e00,$0d00,$0c00,$0b00,$0a00,$0900,$0800 
dc.w $0700,$0600,$0500,$0400 

dc.w $0500,$0600,$0700,$0800,$0900,$0a00,$0b00,$0c00 
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dc.w $OdOO,$OeOO,$OfOO 
dc.w $ffff 
7 

colptr2: dc.l colo2 
colo2: 

dc.w $OfOO,$OfOO,$OeOO,$OeOO,$OdOO,$OdOO,$OcOO,$OcOO 
dc.w $ObOO,$ObOO,$OaOO,$OaOO,$0900,$0900,$0800,$0800 
dc.w $0700,$0700,$0600,$0600,$0500,$0500,$0400,$0400 
dc.w $0300,$0300,$0200,$0200,$0100,$0100,$0000,$0000 
dc.w $0100,$0100,$0200,$0200,$0300,$0300,$0400,$0400 
dc.w $0500,$0500,$0600,$0600,$0700,$0700,$0800,$0800 
dc.w $0900,$0900,$0a00,$0a00,$0b00,$0b00,$0c00,$0c00 
dc.w $0d00,$0d00,$0e00,$0e00,$0f00,$0f00 
dc.w $ffff 
7 

colorptr: dc.l colors 
colors: 

dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $0fff,$0fff,$0fff,$0fff,$0fff 
dc.w $0fff,$0fff,$0fff,$0fff,$0fff 
dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $0f00,$0f00,$0f00,$0f00,$0f00 
dc.w $ffff 
7 

shadeptr: dc.l shade 
shade: 

dc.w $111,$222,$333,$444,$555,$666,$777,$888,$999,$aaa 
dc.w $bbb,$ccc,$ddd,$eee,$fff, $fff, $eee,$ddd,$ccc,$bbb 
dc.w $aaa,$999,$888,$777,$666,$555,$444,$333,$222,$111,$ffff 
7 

parptr: dc.l parabel 
parabel: 

dc.w $3001,$3001,$3001,$3001,$3201,$3201,$3201,$3301,$3301 
dc.w $3301,$3501,$3501,$3501,$3601,$3601,$3601,$3701,$3701 
dc.w $3701,$3801,$3801,$3801,$3901,$3901,$3901,$3a01,$3a01 
dc.w $3a01,$3b01,$3b01,$3b01,$3c01,$3c01,$3c01,$3d01,$3d01 
dc.w $3d01,$3e01,$3e01,$3e01,$3f01,$3f01,$3f01,$4001,$4001 
dc.w $4201,$4201,$4401,$4401,$4601,$4601,$4801,$4801,$4b01 
dc.w $4b01,$4e01,$4e01,$5101,$5101,$5401,$5401,$6001,$6001 
dc.w $7001,$7001,$8001,$8001,$9001,$9001,$a001,$a001,$b001 
dc.w $b001,$c001,$c001,$d001,$d001,$e001,$e001 
dc.w $e001,$e001,$d001,$d001,$c001,$c001,$b001,$b001,$a001 
dc.w $a001,$9001,$9001 ,$8001,$8001,$7001,$7001,$6001,$6001 
dc.w $5401,$5401,$5101,$5101,$4e01,$4e01,$4b01,$4b01,$4801 
dc.w $4801,$4601,$4601,$4401,$4401,$4201,$4201,$4001,$4001 
dc.w $3f01,$3f01,$3f01,$3e01,$3e01,$3e01,$3d01,$3d01,$3d01 
dc.w $3c01,$3c01,$3c01,$3b01,$3b01,$3b01,$3a01,$3a01,$3a01 
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dc.W $3901,$3901,$3901,$3801,$3801,$3801,$3701,$3701,$3701 
dc.w $3601,$3601,$3601,$3501,$3501,$3501,$3301,$3301,$3301 
dc.W $3201,$3201,$3201,$3001,$3001,$3001,$3001 
dc.w $ffff 
7 

; Sprite Daten 
7 

spritebufferl: dc.w $a08c,$b000 ;Buffer für SpriteO 
sbO: dc.w $0001,$0000 ;(=Sprite des Spielers) 

dc.w $0007,$0001 
dc.w $001A,$0006 
dc.w $0062,$001E 
dc.w $0184,$007C 
dc.w $0604,$01FC 
dc.w $0808,$07F8 
dc.w $0808,$07F8 
dc.w $1010,$0FF0 
dc.w $1010,$0FF0 
dc.w $2060,$1FE0 
dc.w $2180,$1F80 
dc.w $4600,$3E00 
dc.w $5800,$3800 
dc.w $E000,$6000 
dc.w $8000,$0000 
sbl: 

dc.w $0001,$0000 
dc.w $0007,$0001 
dc.w $001A,$0006 
dc.w $0062,$001E 
dc.w $0184,$007C 
dc.w $0604,$01FC 
dc.w $0808,$07F8 
dc.w $0808,$07F8 
dc.w $1010,$0FF0 
dc.w $1010,$0FF0 
dc.w $2060,$1FE0 
dc.w $2180,$1F80 
dc.w $4600,$3E00 
dc.w $5800,$3800 
dc.w $E000,$6000 
dc.w $8000,$0000 
sb2: 

dc.w $0000,$0000 
dc.w $0000,$0000 
dc.w $0000,$0000 
dc.w $1FF8,$0008 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
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dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $1FF8,$0FF8 
dc.w $0000,$0000 
dc.w $0000,$0000 
dc.w $0000,$0000 

sb3: 

dc.w $C000,$4000 
dc.w $7000,$3000 
dc.w $4000,$3C00 
dc.w $2300,$1F00 
dc.w $2000,$1FC0 
dc.w $1020,$0FE0 
dc.w $1020,$0FE0 
dc.w $0810,$07F0 
dc.w $0810,$07F0 
dc.w $0408,$03F8 
dc.w $0408,$03F8 
dc.w $0304,$00FC 
dc.w $0004,$0030 
dc.w $0032,$000E 
dc.w $000E,$0002 
dc.w $0003,$0000 

/ 

spritel: dc.w $a08c,$b000 ;Sprite für Joystick 

sl: dc.w $0001,$0000 ;Phase 1 

dc.w $0007,$0001 
dc.w $001A,$0006 
dc.w $0062,$001E 
dc.w $0184,$007C 
dc.w $0604,$01FC 
dc.W $0808,$07F8 
dc.w $0808,$07F8 
dc.w $1010,$0FF0 
dc.w $1010,$0FF0 
dc.w $2060,$1FE0 
dc.w $2180,$1F80 
dc.w $4600,$3E00 
dc.w $5800,$3800 
dc.w $E000,$6000 
dc.w $8000,$0000 

s2: 

dc.w $0000,$0000 ;Phase 2 
dc.w $0000,$0000 
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dC.W $0000,$0000 
dc.W $1FF8,$0008 
de.w $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1008,$0FF8 
dc.W $1FF8,$0FF8 
dc.W $0000,$0000 
dc.W $0000,$0000 
dc.W $0000,$0000 

s3: 

dc.w $0000,$4000 ;Phase 3 

dc.W $7000,$3000 

dc.w $4000,$3000 

dc.w $2300,$1F00 

dc.w $2000,$1FC0 

dc.w $1020,$0FE0 

dc.w $1020,$0FE0 

dc.w $0810,$07F0 

dc.w $0810,$07F0 

dc.w $0408,$03F8 

dc.w $0408,$03F8 

dc.w $0304,$00FC 

dc.w $0004,$0030 

dc.w $0032,$000E 

dc.w $000E,$0002 

dc.w $0003,$0000 

/ 

sprite2: dc.w $a08c,$b000 ;ExplQsions sprite 

ssl: 

dc.w $003E,$003E ;Phase 1 

dc.w $202D,$2037 

dc.w $7C7D,$7063 

dc.w $37D9,$2FE7 

dc.w $1832,$27CE 

dc.w $6784,$7870 

dc.w $3304,$3C3C 

dc.w $3A76,$3D8E 

dc.w $1B2A,$1CD6 

dc.w $0BA6,$0C7E 

dc.w $0C7E,$0FFE 

dc.w $0870,$0FFC 

dc.w $1230,$1DF0 

dc.w $17E0,$1860 
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dc.W $1FC0,$1BC0 
dc.W $0E00,$0E00 

ss2: 

dc.w $003E,$003E ;Phase 2 

dc.W $3BED,$3BF7 

dc.w $6E7D,$7FE3 

dc.w $6089,$7FF7 

dc.w $58E3,$671F 

dc.w $47D2,$782E 

dc.w $203A,$3FC6 

dc.w $31F7,$3E0F 

dc.w $1FB1,$104F 

dc.w $0BC1,$0C3F 

dc.w $0083,$0F7F 

dc.w $006F,$0FFF 

dc.w $1218,$1DF8 

dc.w $1738,$18F8 

dc.w $1F78,$1BF8 

dc.w $0FC0,$0FC0 

ss3: 

dc.w $003E,$003E ;Phase 3 

dc.w $3BED,$3BF7 

dc.w $6E7D,$7FE3 

dc.w $6289,$7FF7 

dc.w $5B63,$679F 

dc.w $435A,$7FA6 

dc.w $583A,$67C6 

dc.w $41CF,$7E77 

dc.w $2DE9,$3677 

dc.w $2B3D,$3CF3 

dc.w $3B55,$3CBB 

dc.w $3359,$3CB7 

dc.w $1352,$1CBE 

dc.w $1624,$19DC 

dc.w $1F6C,$1BFC 

dc.w $0FD0,$0FD0 

/ 

sprite3: dc.w $508c,$6000 ;Feind (roter Punkt) 

seO: 

dc.w $03E0,$0020 
dc.w $0C18,$03F8 
dc.w $1004,$0FFC 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
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dc.w $4001,$3FFF 
de.W $2002,$1FFE 
dC.W $2002,$1FFE 
dc.w $1004,$0FFC 
dc.w $0C18,$03F8 
dc.w $03E0,$01E0 
dc.w $0000,$0000 
sei: 

dc.w $03E0,$0020 ;Phase 1 
dc.w $0C18,$03F8 
dc.w $1004,$0FFC 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
dc.w $4001,$3FFF 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $1004,$0FFC 
dc.w $0C18,$03F8 
dc.w $03E0,$01E0 
dc.w $0000,$0000 
se2: 

dc.w $0000,$0000 ;Phase 2 
dc.w $03E0,$0020 
dc.w $0C18,$03F8 
dc.w $1004,$0FFC 
dc.w $1004,$0FFC 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $2002,$1FFE 
dc.w $1004,$0FFC 
dc.w $1004,$0FFC 
dc.w $0C18,$03F8 
dc.w $03E0,$01E0 
dc.w $0000,$0000 
dc.w $0000,$0000 
se3: 

dc.w $0000,$0000 ;Phase 3 

dc.w $0000,$0000 

dc.w $03E0,$0020 

dc.w $0410,$03F0 

dc.w $0808,$07F8 

dc.w $1004,$0FFC 
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dc.W $1004, $0FFC 
dc.w $1004,$0FFC 
dc.W $1004,$0FPC 
dc.w $1004,$0FFC 
dc.w $0808,$07F8 
dc.w $0410,$03F0 
dc.w $03E0,$01E0 
dc.w $0000,$0000 
dc.w $0000,$0000 
dc.w $0000,$0000 

/ 

sprite4: 

dc.w $0000,$0000 ;Symbol 1 

smO: 

dc.w $0180,$0080 
dc.w $0240,$01C0 
dc.w $0420,$03E0 
dc.w $0990,$06F0 
dc.w $1248,$0DF8 
dc.w $2424,$1BFC 
dc.w $4812,$37FE 
dc.w $9009,$6FFF 
dc.w $9009,$6FFF 
dc.w $4812,$37FE 
dc.w $2424,$1BFC 
dc.w $1248,$0DF8 
dc.w $0990,$06F0 
dc.w $0420,$03E0 
dc.w $0240,$0100 
dc.w $0180,$0080 

sml: 

dc.w $0180,$0080 ;Phase 1 

dc.w $0240,$0100 

dc.w $0420,$03E0 

dc.w $0990,$06F0 

dc.w $1248,$0DF8 

dc.w $2424,$1BFC 

dc.w $4812,$37FE 

dc.w $9009,$6FFF 

dc.w $9009,$6FFF 

dc.w $4812,$37FE 

dc.w $2424,$1BFC 

dc.w $1248,$0DF8 

dc.w $0990,$06F0 

dc.w $0420,$03E0 

dc.w $0240,$0100 

dc.w $0180,$0080 

sm2: 
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dc.w $0180,$0080 ;Phase 2 

dc.w $0240,$01C0 

dc.w $0420,$03E0 

dc.w $0990,$06F0 

dc.w $1248,$0C78 

dc.w $2424,$183C 

dc.w $4812,$319E 

dc.w $9009,$63CF 

dc.w $9009,$63CF 

dc.w $4812,$319E 

dc.w $2424,$183C 

dc.w $1248,$0C78 

dc.w $0990,$06F0 

dc.w $0420,$03E0 

dc.w $0240,$01C0 

dc.w $0180,$0080 

sm3: 

dc.w $0180,$0080 ;Phase 3 

dc.w $0240,$01C0 

dc.w $0420,$03E0 

dc.w $0990,$06F0 

dc.w $1248,$0C78 

dc.w $2424,$183C 

dc.w $4812,$301E 

dc.w $9009,$600F 

dc.w $9009,$600F 

dc.w $4812,$301E 

dc.w $2424,$183C 

dc.w $1248,$0C78 

dc.w $0990,$06F0 

dc.w $0420,$03E0 

dc.w $0240,$01C0 

dc.w $0180,$0080 

/ 

spriteS: 

dc.w $0000,$0000 ;Symbol 2 

snO: 

dc.w $FFFF,$0001 
dc.w $6002,$1FFE 
dc.w $100C,$0FFC 
dc.w $0810,$07F0 
dc.w $0420,$03E0 
dc.w $0420,$03E0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
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de.W $0420,$03E0 
dc.w $0420,$03E0 
dc.w $1818,$07F8 
dc.W $2004,$1FFC 
dc.w $FFFF,$3FFF 
snl: 

dc.w $FFFF,$0001 /Phase 1 
dc.w $6002,$1FFE 
dc.w $100C,$0FFC 
dc.w $0810,$07F0 
dc.w $0420,$03E0 
dc.w $0420,$03E0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0240,$01C0 
dc.w $0420,$03E0 
dc.w $0420,$03E0 
dc.w $1818,$07F8 
dc.w $2004,$1FFC 
dc.w $FFFF,$3FFF 
sn2: 

dc.w $FFFF,$0001 ;Phase 2 
dc.w $4002,$3FFE 
dc.w $2004,$1FFC 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $0810,$07F0 
dc.w $0810,$07F0 
dc.w $0810,$07F0 
dc.w $0810,$07F0 
dc.w $0810,$07F0 
dc.w $0810,$07F0 
dc.w $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $2004,$1FFC 
dc.w $4002,$3FFE 
dc.w $FFFF,$7FFF 
sn3: 

dc.w $FFFF,$0001 ;Phase 3 

dc.w $4002,$3FFE 

dc.w $4002,$3FFE 

dc.w $2004,$1FFC 

dc.w $2004,$1FFC 

dc.w $1008,$0FF8 

dc.w $1008,$0FF8 

dc.w $1008,$0FF8 
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de.W $1008,$0FF8 
dc.w $1008,$0FF8 
dc.W $1008,$0FF8 
dc.w $1008,$0FF8 
dc.w $2004,$1FFC 
dc.w $2004,$1FFC 
dc.w $4002,$3FFE 
dc.w $FFFF,$7FFF 


; Copperliste 


/ 

copperl: 




dc.w 

$008e,$3081 

;DIWSTRT 


dc.w 

$0090,$35cl 

;DIWSTOP 


dc.w 

$0104,$0064 

;BPLC0N2 


dc.w 

$0092,$0038 

;DDFSTRT 


dc.w 

$0094,$00d0 

;DDFSTOP 


dc.w 

$0102,$0000 

;BPLC0N1 


dc.w 

$0108,$0000 

;BPL1M0D 


dc.w 

$010a,$0000 

;BPL2M0D 


dc.w 

$0100,$6600 

;BPLCONO 

pll: 

dc.w 

$00e0,$0000 

;BPL1PTH 


dc.w 

$00e2,$0000 

;BPL1PTL 

plll: 

dc.w 

$00e4,$0000 

;BPL2PTH 


dc.w 

$00e6,$0000 

;BPL2PTL 

pl2: 

dc.w 

$00e8,$0000 

;BPL3PTH 


dc.w 

$00ea,$0000 

;BPL3PTL 

pl22: 

dc.w 

$00ec,$0000 

;BPL4PTH 


dc.w 

$00ee,$0000 

;BPL4PTL 

pl3: 

dc.w 

$00f0,$0000 

;BPL5PTH 


dc.w 

$00f2,$0000 

;BPL5PTL 

pl33: 

dc.w 

$00f4,$0000 

;BPL6PTH 


dc.w 

$00f6,$0000 

;BPL6PTL 

pl: 

dc.w 

$0120,$0000 

;SPR0PTH 


dc.w 

$0122,$0000 

;SPR0PTL 


dc.w 

$0124,$0000 

;SPR1PTH 


dc.w 

$0126,$0000 

;SPR1PTL 

p2: 

dc.w 

$0128,$0000 

;SPR2PTH 


dc.w 

$012a,$0000 

;SPR2PTL 


dc.w 

$012c,$0000 

;SPR3PTH 


dc.w 

$012e,$0000 

;SPR3PTL 

P 3: 

dc.w 

$0130,$0000 

;SPR4PTH 


dc.w 

$0132,$0000 

;SPR4PTL 


dc.w 

$0134,$0000 

;SPR5PTH 


dc.w 

$0136,$0000 

;SPR5PTL 

p4: 

dc.w 

$0138,$0000 

;SPR6PTH 


dc.w 

$013a,$0000 

;SPR6PTL 


dc.w 

$013c,$0000 

;SPR7PTH 
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de.w $013e,$0000 ;SPR7PTL 

dc.w $0180,$0000 ;Farben für kleines 

dc.w $0182,$00ff ;Playfield 

dc.w $0184,$00de 

dc.w $0186,$00cc 

dc.w $0188,$00ab 

dc.w $018a,$009a 

dc.w $018c,$0078 

dc.w $018e,$0067 

dc.w $0190,$0000 ;Farben für großes 

dc.w $0192,$0e84 ;Playfield 

dc.w $0194,$0d73 

dc.w $0196,$0b62 

dc.w $0198,$0a51 

dc.w $019a,$0941 

dc.w $019c,$0730 

dc.w $019e,$0620 

sprr0:dc.w $01a0,$0000 /Farben für Joystick- 

dc.w $01a2,$0f0c /Sprite 

dc.w $01a4,$0c0a 
dc.w $01a6,$0a08 

sprrl:dc.w $01a8,$0000 /Farben für Feind- 
dc.w $01aa,$0f00 /Sprite 

dc.w $01ac,$0b00 
dc.w $01ae,$0800 

sprr2:dc.w $01b0,$0000 /Farben für Symbol- 

dc.w $01b2,$00f0 /Sprite 1 

dc.w $01b4 , $00a0 
dc.w $01b6,$0060 

sprr3:dc.w $01b8,$0000 /Farben für Symbol- 

dc.w $01ba,$0ff0 /Sprite 2 

dc.w $01bc,$0aa0 
dc.w $01be,$0660 

eins: blk.w 120 /Platz für 3D-Rolle 

dc.w $ff01,$fffe /Wait 

dc.w $0100,$5200 /BPLCONO 

pllll:dc.w $00e0,$0000 /BPL1PTH 

dc.w $00e2,$0000 /BPL1PTL 

dc.w $00e4,$0000 /BPL2PTH 

dc.w $00e6,$0000 /BPL2PTL 

dc.w $00e8,$0000 /BPL3PTH 

dc.w $00ea,$0000 /BPL3PTL 

dc.w $00ec,$0000 /BPL4PTH 

dc.w $00ee,$0000 /BPL4PTL 

dc.w $00f0,$0000 /BPL5PTH 

dc.w $00f2,$0000 /BPL5PTL 

col: dc.w $0180,$0000 /Farben für die untere 

dc.w $0182,$00f0 /Anzeigetafel 
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de.W $0184,$0fff 
de.w $0186,$0fff 
sieger:dc.w $0188,$0888 


dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
aal: dc.w 

aa2: dc.w 
aa3: dc.w 

dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 
dc.w 


$018a,$0256 
$018c,$0888 
$018e,$0fff 
$0190,$0267 
$0192,$0278 
$0194,$038a 
$0196,$03ab 
$0198,$0d33 
$019a,$0b33 
$019c,$0a22 
$019e,$0922 
$01a0,$0fff 
$01a2,$0fff 
$01a4,$0fff 
$01a6,$0fff 
$01a8,$0fff 
$01aa,$0f77 
$01ac,$0c55 
$01ae,$0733 
$01b0,$0f77 
$01b2,$0e66 
$01b4,$0d66 
$01b6,$0c55 
$01b8,$0a55 
$01ba,$0944 
$01bc,$0844 
$01be,$0733 
$ffff,$fffe 


; Endekennung 


sgl: =16/8*5 
grl: =320/8*400 
gr2: =320/8*600 
gr3: =320/8*56 
picl: =blk.b grl*3 
pic2: =blk.b gr2*3 
pic3: =blk.b gr3*5 
music: =blk.b 74856 
lifel: =blk.b 500 
life2: =blk.b 500 
life3: =blk.b 500 
finis: 
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3. DIE PROGRAMM-DISKETTE 


Nicht nur um Ihnen das lästige Abtippen zu ersparen, sondern 
auch um Druckfehler zu vermeiden, haben wir dem Buch eine 
Diskette, sowohl mit allen im Buch erklärten Source- 
Listings, als auch mit den dazugehörigen Grafik- und Musik- 
Daten, beigelegt. Wenn Sie Ihre Beispieldiskette in dfO: 
einlegen und im CLI mit dem Befehl 

dir dfO: opt a 

ansehen, sollten darauf folgende Files enthalten sein: 


Pictures (dir) 

lplane.con 

5planes.con 


Source (dir) 

BasicScreen.s 
Bild2.s 
BlitterClr.s 
Copperliste2.s 
Flagge.s 
Joystick.s 
Spritei.s 
Sprite3.s 
Sprite5.s 


Game (dir) 

1 .con 
3.con 
down.pic 

Game_sprites.pic 
plane_gr.con 
plane__kl .con 


lPlane.pic 

Splanes.pic 


Bildl.s 
Blitten.s 
Copperlistel.s 
CopperScroll.s 
Game. s 
Schunkeln.s 
Sprite2.s 
Sprite4.s 
Sternenhimmel.s 


2 .con 
down.con 
Game 
music 

Plane_gr.pic 
plane__kl .pic 
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Auf der Diskette finden Sie alle Daten in den passenden Un¬ 
terverzeichnissen. In der Lade "Pictures" befinden sich 
nicht nur die IFF-Bilder, gekennzeichnet durch ".pic", son¬ 
dern auch die bereits ins RAW-Format konvertierten und somit 
für die Beispielprogramme verwendbaren Bilder, die mit dem 
Zeichen ".con" versehen wurden. 

Im Unterverzeichnis "Source” sind alle Beispiel-Listings 
vorhanden, welche mit dem Seka-Assembler erstellt worden 
sind. Es dürfte aber kein Problem sein, diese auch für ande¬ 
re Assembler zu verwenden. 

Im letzten Verzeichnis, "Game", finden Sie das fertige Spiel 
als Object-code, das bedeutet, Sie können das Programm vom 
CLI aus aufrufen. Ebenso sind in diesem Verzeichnis alle 
Bilder und die Musik, die im Spiel selbst verwendet werden. 
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4. LITERATURVERZEICHNIS 


Falls Sie grundlegende Fragen über den Amiga, seine Baustei¬ 
ne oder die Assembler-Programmierung haben, können Sie in 
der unten angeführten Literatur nachschlagen. 


1. Amiga Hardware Reference Manual 

1986 Addison Wesley, Inc. 

ISBN 0-201-11077-6 

update Version 1989 
ISBN 0-201-18157-6 


2. Eine Einführung in die Assemblerprogrammierung, 
Autor: Nikolaus Laber 

1989 Addison Wesley, Inc. 

ISBN 3-89319-145-3 


3. The Amiga DOS Manual, (englische Originalfassung) 

1986 Bantam Books 
ISBN 0-553-34294-0 


4. AmigaDOS Handbuch 

Deutsche übersetztung vom engl. Original, M&T 
ISBN 3-89090-465-3 


5. M68000 Familie Teil 1, Hilf/Nausch 
1984 tewi 

ISBN 3-921-803-16-0 


6. M68000 Familie Teil 2, Hilf/Nausch 
1984 tewi 

ISBN 3-921-803-30-6 
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7. Die 68000er Serie Buch 1, Nachmann 

1986 Elektor Verlag 
ISBN 3-921608-42-2 


8. Die 68000er Serie Buch 2, Nachmann 

1986 Elektor Verlag 
ISBN 3-921608-43-0 


9. Amiga Intern, Dittrich/Gelfand/Schemmel 

1987 Data Becker 
ISBN 3-89090-525-0 
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5. STICHWORTVERZEICHNIS 


3 

3D-Rolle, 59 

4 

4096 Farben, 63 
6 

68000er, 24 
A 

Adressierungsarten, 2 9 
Adreß-Register, 26 
Adreßbreite, 24 
Ascending, 141 
Assembler, 25 
Attached Sprites, 114 
Attached-Bit, 114 

B 

Betriebssystem, 12 
Bildpunkte, 22 
Bildschirm-Splitting, 94 
Bildschirmaufbau, 37 
Bildschirmdarstellung, 43 
Bildschirmfenster, 65 
Bildschirmspeicher, 44 
Bitplane, 66 

Bitplanes verschieben, 79 
Bitverschiebung, 139 
Blitter, 39, 133 
Blitterregister, 135 
Blitterstatus, 39 
Bobs, 63 
Buszyklus, 66 
Bytes, 31 

c 

Chip-RAM, 23,24 
CIA, 23, 24 
Convert-Utility, 72 
Copper, 37 

Copperliste, 43, 46, 86 
Customchips, 24, 38 


D 

Datenliste, 97 
Datenregister, 25, 108 
Decending, 141 
Division, 30 
DMA, 102 

Dreidimensional, 59 
Dual-Playfield-Modus, 63 

E 

Endekennung, 47 
Expansionsport, 2 3 

F 

Farbabstufungen, 61 
Farbbuffer, 47 
Farbmischung, 70 
Farbregister, 29, 70 
Farbtabelle, 61 
Farbverlauf, 49 
Farbwechsel, 44 
Farbwerte, 29 
Fast RAM, 23 
Fast-Mem, 24 
Fernseher, 37 

G 

Geschicklichkeitsspiel, 20 
Geschwindigkeit, 25 

H 

HAM-Modus, 75 
Ha1fbrite-Modus, 7 2 
Hardware, 23 
Hardware-Register, 29 
Hauptprogramm, 49 
Hi-res, 37 

High-Word, 40, 66,92 
Hintergrundfarbe, 43 
Horizontales Scrolling, 90 
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I 

Idee, 14 
IFF-File, 72 
Interrupt-Routine, 30 
Interrupts, 42 

J 

Joystick-Abfrage, 150 
Joystick-Buttons, 152 

K 

Kathodenstrahlröhre, 37 
Kickstart-Rom, 23 
Kollisionsabfrage, 122 
Kompatibilität, 13 
Kontrollwort, 101 
Konzept, 14 

L 

Labels, 88 
Lo-res, 37 

Long-Word-Befehl, 86 
Longword, 27, 31 
Low-Word, 40, 66,92 

M 

Maskenbits, 39 
Maustaste, 42 
Mauszeiger, 99 
Miniterms, 139 
Module, 73 
Modulo, 69 
Monitor, 37 
Move, 38 

Multiplikation, 30 
Multitasking, 13 

N 

Netzspannung, 37 
Null-Byte, 79 

P 

PC-relativ, 27 
Planung, 15 
Playfield, 88 
Playfield-Register, 66 
Playfields, 42, 63, 85 
Prioritäten, 69, 118 
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Prozessor, 37 
Q 

Quelltext, 33 
Quickbefehle, 26 

R 

RAW-Format, 72 
Rahmenfarbe, 66 
Rasterzeile, 44 
Real-Image Kommando, 73 
Register, 65 
Relocation-Hunk, 27 
Rücksprung, 47 

S 

Schleife, 33 
Scrollen, 49 
Scrolling, 69 
Seka-Assembler, 73 
Short-Kommandos, 2 8 
Simulationen, 20 
Sinusförmig, 54 
Skip, 38 

Soundprogrammierung, 129 
Speicherbelegung, 23 
Speicherbereich, 24 
Speichereinteilung, 25 
Speichererweiterung, 2 3 
Speicherplatz, 30 
Speicherstelle, 32, 65 
Spiegelung, 23 
Spielfeld, 22 
Spielraster, 20 
Sprite-Animationen, 111 
Sprite-DMA, 97 
Sprite-Kanal, 109 
Sprites, 42, 63, 97 
Sprites-Bewegung, 105 
Sprites-Positionierung, 101 
Sprungbefehl, 28 
Sternenhimmel, 155 
Strahlenposition, 43 
Subroutine, 47 

T 

Taktzyklen, 25 
Tastatur-Abfrage, 153 
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Testphase 

Töne erzeugen, 130 

ü 

Unterroutine, 28, 46, 49 
V 

Vertikale Positionen, 54 
Vertikales Scrolling, 85 
Verzweigungen, 3 9 
Video-Chip, 72 
Vorzeichenbehaftet, 2 7 

w 

Wait, 38 
Word, 31 
Workbench, 12 
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VIDEO- UND COMPUTERZENTRUM 

Planegger Str. 6/Ecke Am Klostergarten 1,8000 München 60 


Bei uns finden Sie alles unter einem Dach, 
angefangen von Camcordern, bis hin zu 
Videorekordern, -nachbearbeitungsgeräten, 
Mischpulten, Schnittplätze, Genlocks und 
natürlich den Commodore Amiga mit all 
seinem Zubehör im Bereich Hard- und Software. 


Alle Artikel sind auch im Versand 
erhältlich. 

Wählen Sie die Nummer 089/834 05 91 und 
geben Sie Ihre Bestellung auf. 





Fachliche Beratung, durch unsere aus der 
Presse bekannten Autoren, die Ihnen sicher 
eine Menge Geld und Ärger sparen wird, steht 
bei uns an erster Stelle. 

Unser Reparaturservice bringt Ihr defektes 
Gerät schnell wieder in Schwung. 


Titelservice-Ihr Videofilm wird 
fernsehreif 

Sie senden uns Ihren Video film zu und teilen 
uns mit, an welcher Stelle welche Titel 
erscheinen sollen - und wir betiteln Ihren Film 
wunschgemäß. 

Eine Videokassette mit einer Menge ver¬ 
schiedener Titeleffekte können Sie gegen 
eine Schutzgebühr von DM 20,00 an fordern. 


I. 

Lechner 


Verlag Gabriele Lechner 
Video- und Computer-Zubehör 
Am Klostergarten 1 
Ecke Planegger Straße 
12 Minuten vom 
Pasinger Marienplatz) 

8000 München 60 
Telefon 089/8 34 05 91 
Telefax 089/820 43 55 





BESTSELLER AUS DEM 
VERLAG LECHNER 


ISBN 3-926858-10-9 
340 Seiten, 

67 Abbildungen 
inklusive 1 Diskette 
DM69,00 


ISBN 3-926858-12-5 
360 Seiten, 

105 Abbildungen 
inklusive 1 Diskette 
DM 69,00 
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DISKETTEN ZU DELUXE PAINT 



Disk 1: Trickfilm-Elemente Disk 2: Special Effects 

Inhalt: Hintergrundbilder, Anim-Brushes Inhalt: Anim-Brushes (Wellen, Flammen, 

(Explosion, Feuerwerkskörper, galoppieren- zerknitterte Coladose, Seifenblasen, Fa¬ 
des Einhorn...) DM 49,00 * pierblatt im Wind, Skispringer, Abfahrts¬ 

läufer, Rennboot, Mississippi-Raddampfer, 
3D-Titel und vieles mehr) DM 49,00* 



Disk 3: Tiere Disk 4: Videofonts 

Inhalt: Eine Diskette mit perfekt animierten Inhalt: 6 unterschiedliche Schriftsätze in ver¬ 
lieren, die Sie in Ihr Video einbauen oder schiedenen Größen und Muster, davon 

in einem Zeichentrickfilm vewenden können. 1 animierter Font. DM 49,00* 

(z.B. Flußpferd, Gepard, Storch, Papagei, 

Flamingo, USW.) DM 49,00* A,te Preis* sind unverbindlich empfohlene Verkaufspreise inid. MWSt. 



VIDEO- UND COMPUTERZENTRUM 

Planegger Str. 6/Ecke Am Klostergarten 1,8000 München 60 


SPEZIALSEMINARE ZUM THEMA 
VIDEO UND AMIGA 

Sie sind aktiver Video filmer? 

Haben Sie schon daran gedacht, Ihr Hobby 
sinnvoll, kreativ und gewinnbringend 
auszubauen? 

In den Seminaren wird Ihnen durch unsere 
Fachautoren das notwendige Wissen 
interessant und praxisnah vermittelt. 

Modernste Video- und -nachbearbeitungs- 
gerate kommen zum Einsatz und werden 
praktisch bedient. 

Für jeden Kursteilnehmer steht ein 
Commodore Amiga zur Verfügung. 




EIN EXTRA BONUS! 

Jeder Kursteilnehmer kann seinen eigenei 
Videofilm mitbringen. 

Er wird unter Anleitung zu einem fernseh- 
reifen Videofilm verwandelt, den Sie mit Stob 
und Begeisterung Ihrer Familie und Freunder 
zeigen können. 

KURSANGEBOT: 

Kurs 1: Praxis der Videofilmgestaltung 

Termin: jeder2. Samstag im Monat 
von 10.00- 17.00 Uhr 
Preis: 250,00 DM inkl. Kursmaterii 

Kurs 2: Video-Spezialeffekte 

Termin: jeder3. Samstag im Monat 
von 10.00- 17.00 Uhr 
Preis: 250,00 DM inkl. Kursmaterii 


L 

Lechner 


Verlag Gabriele Lechner 
Video- und Computer-Zubehör 
Am Klostergarten 1 
Ecke Planegger Straße 
12 Minuten vom 
Pasinger Marienplatz) 

8000 München 60 
Telefon 089/8 34 05 91 
Telefax 089/8204355 


Kurs 3: Video-Studiotricks 

Termin: jeder 4. Samstag im Monat 
von 10.00- 17.00 Uhr 
Preis: 250,00 DM inkl. Kursmatern 

Kurs 4: Videonachbearbeitung- 
Schnitt- Techniken 

Termin: jeden Donnerstag 

von 18.30-20.30 Uhr 
Preis: 90,00 DM 








SPIELE 

SELBER PROGRAMMIEREN 

Hardwareprogrammierung in Assembler 


Spiele faszinierten Menschen schon 
seit Jahrhunderten und gerade im 
Zeitalterder Technik, in der die 
Möglichkeiten zur Spiele-Gestaltung 
unbegrenzt sind, werden die Com¬ 
puterspiele immer beliebter. Der 
Amiga eignet sich, durch seine 
enorme Grafikfähigkeit, hervor¬ 
ragend als Spielekonsole. 

Wer schon immer davon geträumt 
hat, einmal selbst ein Computer¬ 
spielzu entwickeln, erhält mit 
diesem Buch die Grundlage dazu. 

Da man nun in Assembler, die opti¬ 
male „ Bewegungsfreiheit" hat, die 
es ermöglicht kurze und schnelle 
Routinenzu schreiben, wird in 
diesem Buch ausschließlich auf 
diese Sprache eingegangen. 


Dem Autor Niki Laber, der bereits 
eine Reihe professioneller Spiele 
und Programmpakete entwickelt 
hat, gelang es auf verständliche Art 
von der Planung bis zur Pro¬ 
grammierung eines kompletten 
Spieles, alle notwendigen Schritte 
zu erläutern und anhand von Bei¬ 
spielroutinen aufzuzeigen. 

Von der Bilddarstellung bis zur 
Joystick-Abfrage wird alles be¬ 
sprochen, was zur Spieleprogram¬ 
mierung notwendig ist. 

Sämtliche Listings, sowie zusätz¬ 
liche Grafiken und Sounds, sind auf 
der beiliegenden Diskette 
enthalten. 


Verlag Gabriele Lechner 
Am Klostergarten 1 
8000 München 60 


ISBN 3-926858-31-1 
DM 69,-SFr 64,-öS 538 
inkl. 1 Disk. 








